Problemas de programación VB

Debe ser múltiplo de 6, ja. El más pequeño es 102. A partir de 102 se puede reducir el número de cálculos y aumentar la velocidad. El código es el siguiente:

Private Sub Command2_Click()

Dim i , mstr$

mstr = "El número que cumple con los requisitos es:"

Para i = 102 a 200 Paso 6

Si i Mod 4 = 2 y i Mod 5 = 3 Entonces mstr = mstr amp ","

Siguiente i

MsgBox mstr

Fin Sub