Programación VB de Calculadora
Utilice el control Etiqueta para crear cuatro objetos de etiqueta Etiqueta1, Etiqueta2, Etiqueta3 y Etiqueta4 en el formulario. Los títulos de etiqueta1 y etiqueta2 son el primer número y el segundo número respectivamente, y etiqueta4 es el resultado. Cree objetos de cuadro de texto text1 y
text2 en el formulario para ingresar datos.
Utilice el control marco
en el formulario para crear el objeto de marco marco1; utilice el control botón de opción para crear el botón de opción opción1 en el formulario y colóquelo en el marco1
, haga clic en el botón "Copiar", copie la opción 1 6. Cree un control de matriz y cambie sus títulos a "Agregar", "Restar", "Múltiple", "Dividir", "División entera", "dividir", "equilibrio", "exponente" y agregue el siguiente código.
Privado
Sub
Opción1_Click(Índice
Como
Entero)
Dim
x
Como
Único,
y
Como
Único
x
=
Val(Texto1.
y
=
Val(Text2.Text)
Seleccionar
Caso
Índice
Caso
Etiqueta4.Caption p>
=
x
+
y
Caso
1
Etiqueta4. Seleccione
Fin
Sub
Depurar y completar