Red de conocimiento informático - Problemas con los teléfonos móviles - VB llama al procedimiento general de suma y al procedimiento general de diferencia para buscar información detallada para cada afirmación.

VB llama al procedimiento general de suma y al procedimiento general de diferencia para buscar información detallada para cada afirmación.

Private?Sub?Command1_Click() 'Haga clic en Comando1

Dim?x%,?y%?' ¿Definir xey como gráficos largos, es decir, números?

x?=?InputBox("Ingrese datos") 'Aparece una ventana para ingresar datos y asígnelos a x

y?=?InputBox("Ingrese datos data" ) 'Aparece una ventana para ingresar datos y asignar los datos a y

add?x,?y 'Ejecutar el proceso sub.add

Llamar?subst(x , ?y)? y) 'Ejecute el procedimiento almacenado sub.subst, que es el mismo que add.x,.y anterior, y también se puede escribir como subst.x,.y

End. Sub

Sub.add(a,?b) 'Ejecutar sub.add procedimiento almacenado

Dim.c.As?Integer 'Definir c

c? =?a?+?b?'c El valor es igual a a+b

Imprimir?c?'Salidas c

End?Sub

Sub ?subst(a,?b)'Sub?subst ?procedure

Dim?c%'Define c

c?=?a?b'c El valor es igual a a-b

Imprimir?c?'Salida c

Fin?Sub