Que diferencia hay entre estos 2 programas

Cerrado
http://www.monografias.com/trabajos17/manual-visual/manual-visua - 4 nov 2009 a las 03:24
 Elinv - 4 nov 2009 a las 03:40
Hola,
quiciera que me pudieran aunxiliar en estos 2 programas, hay 5 diferencias que no encuntro, que funcion realisa este programa

Dim X as integer
X=1
Do
list+1 additem = (x)
x=x+1
loop while x < = 10

este es el segundo

Dim x as integer
x=1
Do while x < = 10
list.1 additem = (x)
x=x+1
loop

gracias favor de contestar lo antes pocible gracias

1 respuesta

Hola: aquí te dejamos las respuestas que entendemos posibles.

Un abrazo.

Elinv

---------------------------------------------------------------------------------------
Private Sub Command1_Click()
Dim x As Integer
x = 1
'En este ejemplo se escribe el resultado primero
'Y luego se analiza la clausula condicional
Do
'Esta linea no es correcta
'list+1 additem = (x)
'Debiera de ir así
List1.AddItem x
x = x + 1
'Con este comando observas que cuando llega x a 11 se sale
MsgBox x
'Aquí valora el valor de x si es menor o igual a 10
Loop While x <= 10
End Sub

Private Sub Command2_Click()
Dim x As Integer
x = 1
'En este ejemplo se analiza la condicional
' y luego se imprime el resultado
Do While x <= 10
'esta linea tampoco es correcta
'list.1 additem = (x)
'debiera de escribirse así
List1.AddItem x
x = x + 1
'Te muestra el valor de x cuando pasa por este lugar
MsgBox x
'Pero no sale desde aquí si es once, sino sale cuando inicie nuevamente
'el ciclo al evaluar x pues es mayor a 10
Loop
End Sub
-------------------------------------------------------------------------------
0