Suma de cuadrados de los "n" primeros números impares consecutivos Visual Basic Excel

Para crear la suma de cuadrados de impares consecutivos lo primero a considerar es realizar y/o mentalizar y plasmar los formularios correspondientes, tales como el formulario de inserción, el botón de procesado y finalmente la caja de muestra.

Acto seguido copiamos y pegamos el siguiente código de muestreo.

Private Sub CommandButton1_Click()
Dim num As Integer
num = Val(TextBox1)
For i = 1 To num
If (i Mod 2 <> 0) Then
respuesta = respuesta + i ^ 2
End If
Next
TextBox2 = respuesta
End Sub

Nota: El código no fue insertado paciencia