¡Urgente! Programación VB: Calcule los números del 1 al 1000 que son divisibles por 1 y genere
Private Sub Form_Load()
Para I = 1 a 1000
Si modifico 7 = 0 entonces
X = X 1
If = Label1.Caption amp; " " amp; I
Fin
Siguiente I
Fin Sub
Private Sub Form_Load()
Para I = 1 a 1000
Si modifico 7 = 0 entonces
X = X 1
If = Label1.Caption amp; " " amp; I
Fin
Siguiente I
Fin Sub