Unidad 4. VBA. Más estructuras (XI)

Llamada y transferencia de datos y resultados entre procedimiento

El siguiente ejemplo ilustra la forma cómo se llama a un procedimiento que se encarga de leer dos datos, se llama otro procedimiento que calcula el producto de los valores leídos, se imprime en el llamador los valores leídos y se llama a otro para que imprima el resultado devuelto por el procedimiento de cálculo.

Ejemplo 23

Sub Transf()

Call Entrada(a, b)

Call Procesa(a, b, c)

MsgBox ("En el procedimiento principal: " & a & " , " & b)

Call Imprime(c)

End Sub

Sub Entrada(x, y)

x = InputBox("X = ")

y = InputBox("Y = ")

End Sub

Sub Procesa(x, y, r)

r = x * y

End Sub

Sub Imprime(z)

MsgBox ("Calculado en un procedimiento e impreso en otro: " & z)

End Sub

Noviembre-2010

Pág. 4.11