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"
·
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,
