OPERACION - MENSAJE...!!!!

1.-abrimos visual basic

2.- creamos tres formularios en barra de menú, opción proyecto y nos abrió un ventanita y elegimos la opción agregar formulario.

3.-  primer formulario le cambiamos de nombre a inicio en propiedades en la opción  nombre y caption.

4.- insertamos seis comandos en el formulario inicio en la barra de general suprimimos el botón “commandutton” y asemos al objeto en el formulario del tamaño que queramos.

5.- cambiamos el nombre a todos los objetos: seleccionemos cada uno de los objetos y cambiamos el nombre tipo tamaño de la letra en propiedades en la opción caption para el nombre, en la opción fond para el tipo y tamaño de letra.

 
6.- insertamos en cuadro de texto en el formulario inicio y la opción para insertarlo esta en la barra general  y seleccionamos la opción texbox, la ubicas donde quieras y quitamos el nombre del cuadro de texto en propiedades y ella opción text quitamos el txto que esta ay para que salg el resultado que la vamos a poner

 

7.- dimos doble clic sobre los objetos para hacer cada una de sus formulas  del formulario 1(inicio) y estas son sus formulas:

Private Sub b1_Click()

Print " APENDE A HACER OPERACIONES SUERTE"

Print " estas mal" & vbCrLf & "sigue participando"

End Sub

·         Esto es par que aparesca la leyenda en l formulario dándole click en el objeto que es.

Private Sub b2_Click()

MsgBox "INCORRECTO SIGUE ESTUDIANDO" & vbCrLf & "mas practica.", vbCritical, "mensaje 1"

End Sub

·         Esto es para que aparesca el cuadro de texto

Private Sub b3_Click()

End

End Sub

·         Esto es para que te saque del programa.

Private Sub b4_Click()

suma.Show

End Sub

·         Esto es para que el momento de dar click en el objeto te mande al formulario de suma

Private Sub b5_Click()

resta.Show

End Sub

·         Esto  es para que te mande al formulario resta.

Private Sub C1_Click()

Text1.Text = "Hola"

End Sub

·         Esto es para que el resultado o leyenda aparesca en el cuadro de texto.

8.- en el formulario dos llamado suma hicimos 5 commandos, los creamos el la barra general, elegimos la opcion commandbutton y los ubicamos dentro del formulario.

9.- cambiamos el nombre a todos los comandos tipo y tamaño de letra en propiedades ,en opción caption para el nombre, en opción fond para el tipo y tamaño de letra.

10.- insertamos un cuadro de texto en el formulario suma y la opción para insertarlo, esta en la barra general y seleccionamos la opción texbox, la ubicamos donde quera mos y quitamos el nombre que tiene en propiedades en la opción text, quitamos el texto que esta ay para que salga el resultado que la vamos a poner.

11.-dimos doble clic en cada command para hacer cada una de sus formulas de el formulario 2(suma) y estas son sus formlas:

Dim a As Integer, b As Integer, c As Integer, d As Integer

·         En esto es para declarar  variables.

Private Sub b6_Click()

Print "5+5+1"

Print "resultado"

End Sub

·         Esto es para que aparesca la operación en el formulario.

Private Sub b7_Click()

inicio.Show

End Sub

·         Para que te mande al formulario “ inicio” al momento de darle clic

Private Sub b8_Click()

resta.Show

End Sub

·         Para que te mande al formulario de resta al momento del clic en el objeto.

Private Sub C1_Click()

a = 5

b = 5

c = 1

d = a + b + c

Text1 = d

End Sub

·         Esto paraece en el cuadro de texto es el resultado de la operación.

Private Sub Command1_Click()

MsgBox "hola" & vbCrLf & "como estas", vbQuestion, "mensaje 2"

End Sub

·         Es para que aparesca en el cuadro de mensaje

12.- En el formulario 3llamado resta hicimos 6 commandos los creamos en la barra de general, elegimos la opción commandbutton y los ubicamos dentro del formulario.

13.- cambiamos el nombre a todos los comandos tipo y tamaño de letra en propiedades, en la opción caption para el nombre, en la opción Font para el tipo y tamaño de letra.

14.- insertaos u n cuadro de texto en el formulario resta y la opción para incertarla esta en la barra general y seleccionamos la opción texbox la ubicamos donde queramos y le quitamos el nombre que tiene en propiedades en la opción text, quitamos el texto que hay para que salga el resultado que vamos a poner.

15.- damos clic en cada command para hacr cada una de sus formulas en el formulario 3 resta, estas son sus formulas:

Dim a As Integer, b As Integer, c As Integer

·         En esta sirve para declarar variables

Private Sub b10_Click()

inicio.Show

End Sub

·         Esta opción es para que mande al primer formulario  de inicio al momento de hacer clic n el objeto.

Private Sub b11_Click()

End

End Sub

·         En esta opción es para que te es que totalmente en del programa que estas ejecutando.

Private Sub b12_Click()

Print "6-5"

Print "resultado"

End Sub

·         Es para que aparesca la operación en el formulario.

Private Sub b9_Click()

suma.Show

End Sub

·         esto nos manda directamente al formulario de la suma.

Private Sub C1_Click()

a = 6

b = 5

c = a - b

Text1 = c

End Sub

·         esto sirve para que el resultado nos apareca en el cuadro de texto

Private Sub Command1_Click()

MsgBox "hola" & vbCrLf & "que haces", vbExclamation, "mensaje 3"

End Sub

·          esta opcion es para que nos muestre el mensaje

16.- para cambiar el fondo del formulario es asi: seleccionemos el formulario, nos vamos a propiedades y buscamos la opción picture y seleccionemos, vemos la imajenes la seleccionemos y damos abrir,