Buscando código VB para división de calculadora
Subcomando privado 1_Click()
' Dim a, b, c As Single 'Definir variables a, b, c.
A = Val(Text1.Text)' y colóquelo en la unidad de almacenamiento a.
B = Val(Text2.Text)' y colóquelo en la unidad de almacenamiento b.
-
Si b = 0, entonces
Cuadro de mensaje "El separador no puede ser 0 o estar vacío"
Conector de salida
Terminará si...
-
c = a/b' divide los dos divisores en números y almacena el resultado del cálculo en la unidad de almacenamiento c.
Etiqueta 2. "Caption = c" muestra el valor en la ubicación de almacenamiento C en la etiqueta.
Conector final