Maestro de VB, ¿ayúdame a resolver estos dos problemas?
Privado?Sub?Command1_Click()
Dim?i?As?Integer,?j?As?Integer,?n?As?Integer
Dim?ch?As?Boolean
¿Para?i?=?2?A?99
Para?j?=?2?A?p>
ch?=?False p>
Para?j?=?2?A?1
Si?i?Mod?j?=?0?Entonces
ch?=?True p>
¿Salir?Para
¿Fin?Si
Siguiente?j
Si?No?ch?Entonces
Imprimir ?i;
n?=?n?+?1
Si?n?Mod?Imprimir
Finalizar si
Siguiente i
Fin del sub