Red de conocimiento informático - Conocimiento sistemático - Buscando código VB para división de calculadora

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