mmm todavía no lo termino de entender
alguien tendrá con algún ejemplo para entenderlo mejor?
Muchas gracias!

Muchas gracias!

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 cmdBoton1_Click()
Dim sngX As Single, sngY As Single, sngResult As Single
'Carga de datos
sngX = Val(txtValor1.Text) 'El textbox Nº1 donde se ingresa el primer numero se llama txtValor1
sngY = Val(txtValor2.Text) 'El textbox Nº2 donde se ingresa el primer numero se llama txtValor2
'Calculo de la suma
sngResult = sngX / sngY
lblSalida.Caption = Str(sngResult)
End Sub
Private Sub Form_Load()
A = InputBox("Ingrese un valor para a:")
B = InputBox("Ingrese un valor para b:")
MsgBox "El resultado de la operación es:" & Suma(A, B)
End Sub
Private Sub Suma(X As Integer, Y As Integer, Sumar As Integer)
Sumar = A + B
End Sub
Citar(Se te pide primero que insertes 1 numero para la variable a luego otro para la variable b ) y ya cumplidas esas 2 peticiones (donde ambas variables obtienen un valor) entonces las 2 variables pasan a la FUncion Suma y proceden a ser sumadas y el resultado de dicha suma se retorna para ser imprimido por pantalla (stdout)
Cita de: algorythm en 3 Abril 2010, 17:53 PM
Para mi está clarísimo... es pseudocódigo, no hay mucho que analizar...
LEER(A), es leer y almacenar en A un dato ingresado por el usuario.
El subprograma, devuelve la suma de A y B, luego el programa principal, la muestra.