PROGRAMAS SIMPLES

lunes, 8 de septiembre de 2008

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: