CompareIt es muy bueno también.
saludos
saludos
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúPrivate Sub Form_Load()
Dim sDatos As String
Open "ruta_del_archivo" For Input As #1
sDatos = Input(LOF(1), #1)
Close #1
MsgBox (sDatos)
End Sub
suma=0
valor=0
para i=1 to 10
valor=pedir numero
si valor>20 then
suma=suma+valor
fin si
fin para
imprimir suma