1) Ingresamos a Visual Basic y abrimos en EXE ESTANDAR
2)Insertamos en el formulario :
-3 etiquetas
-2 cajas de texto
-1 botón de comando
3)Propiedad de Label1
-Caption: Primer Numero
4)Propiedad de Label2
-Caption: Segundo Numero
5)Propiedad de Label3
-Nombre: lblResultado
-Caption: borrar todo
6)Propiedades de TextBox1
-Nombre: N1
-Text: borrar todo
7)Propiedades de TextBox2
-Nombre: N2
-Text: borrar todo
8)Propiedad de command1
-Caption: sumatoria
9)Doble click en sumatoria y escribimos lo siguiente:
Private Sub Command1_Click()
LblResultado.Caption = "El resultado es " & Val(N1.Text) + Val(N2.Text)
End Sub
10)Click en iniciar, escribimos los numeros, click en sumatoria y nos saldrá el resultado
-Para hacer la operación de resta tendríamos que cambiar el nombre al command1 por Resta, doble click y digitaríamos lo siguiente:
Private Sub Command1_Click()
LblResultado.Caption = "El resultado es " & Val(N1.Text) - Val(N2.Text)
End Sub
-Para hacer la operación de multiplicación tendríamos que cambiar el nombre al command1 por Producto, doble click y digitamos lo siguiente:
Private Sub Command1_Click()
LblResultado.Caption = "El resultado es " & Val(N1.Text) * Val(N2.Text)
End Sub
-En la división se llamaría cociente y digitamos:
Private Sub Command1_Click()
LblResultado.Caption = "El resultado es " & Val(N1.Text) / Val(N2.Text)
End Sub
0 comentarios:
Publicar un comentario