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

=

x

+

y

Caso

1

Etiqueta4. Seleccione

Fin

Sub

Depurar y completar