PROYECTO 3 - Visual Basic

"ÔpeRaCiiOn - MêNzaje"

1.- Abrimos Visual Basic

2.- En el proyecto agregamos 3 formularios.

3.- Les cambiamos el nombre a los 3 formularios, en el recuadro de propiedades, opción nombre al primero le pusimos “INICIO” al segundo “SUMA” y al último “RESTA”.

4.- En el Formulario de INICIO. Insertamos 6 objetos y un cuadro de texto con los nombres de:

5.- Al objeto que dice ((CLIC)) le pusimos el código siguiente:

Private Sub Command1_Click()

Print "BIENVENIDO"

Print "compañero", , "conalep"

Print ""

Print "a visual basic"

End Sub

6.- Luego el objeto que sigue ((SUMA)):

Private Sub Command2_Click()

SUMA.Show

End Sub

7.- Después al objeto que dice ((RESTA))  le pusimos el código siguiente:

Private Sub Command5_Click()

RESTA.Show

End Sub

8.- Luego al de ((SALIR))

Private Sub Command4_Click()

End

End Sub

9.- Despues al que dice ((MENSAJE 1)):

Private Sub Command3_Click()

MsgBox "es incorrecto" & vbCrLf & "sigueintentando", vbCritical, "mensaje1"

End Sub

10.- Y por ultimo al que dice ((CLIC CUADRO)) para que nos salga el texto en el cuadro de texto:

Private Sub C1_Click()

Text1.Text = "HOLA"

End Sub

11.-En el Formulario de SUMA. Insertamos 6 Objetos y un cuadro de texto con los nombres de:

12.- Al objeto que dice ((CLIC)) le pusimos el código siguiente:

Private Sub Command1_Click()

Print "suma"

Print "9+8"

Print ""

Print "resultado"

End Sub

13.- Luego el objeto que sigue ((SALIR)):

Private Sub Command2_Click()

End

End Sub

14.- Después en el siguiente objeto que es ((RESTA)):

Private Sub Command3_Click()

RESTA.Show

End Sub

15.- Después en el siguiente objeto que es ((INICIO))

Private Sub Command3_Click()

RESTA.Show

End Sub

16.- Luego al objeto de ((MENSAJE 2)):

Private Sub Command5_Click()

MsgBox "estas seguro" & vbCrLf & "compañero", vbQuestion, "mensaje1"

End Sub

17.- Declaramos variables hasta arriba:

18.- Y por ultimo al objeto que dice ((RESULTADO)) para que nos aparezca en el cuadro de texto:

Private Sub Command6_Click()

A = 5

B = 3

C = 9

D = A + B + C

Text1 = D

End Sub

19.- En el Formulario de RESTA. Insertamos 6 Objetos y un cuadro de texto con los nombres de:

20.- Al objeto que dice ((CLIC)) le pusimos el código siguiente:

Private Sub Command1_Click()

Print "resta"

Print "50-12"

Print ""

Print "resultado"

End Sub

21.- Luego el objeto que sigue ((SUMA)):

Private Sub Command2_Click()

SUMA.Show

End Sub

22.- Después en el siguiente objeto que es ((INICIO)):

Private Sub Command3_Click()

INICIO.Show

End Sub

23.- Después en el siguiente objeto que es ((SALIR)):

Private Sub Command4_Click()

End

End Sub

24.- Luego al objeto de ((MENSAJE 3)):

Private Sub Command5_Click()

MsgBox "Estas Restando" & vbCrLf & "compañero", vbInformation, "mensaje2"

End Sub

25.- Y por ultimo al objeto que dice ((RESULTADO)) para que nos aparezca en el cuadro de texto

Private Sub Command6_Click()

A = 50

B = 5

C = 7

D = A - B - C

Text1 = D

End Sub

26.- Corremos el programa para verificar que este bien en la siguiente opción:

27.- Y después verificamos que nuestro proyecto si este correctamente:

28.-Ya que insertamos los objetos les podemos cambiar el tipo de letra, y el tamaño en la opción “FONT”

29.-  Y también ponerle color al formulario en la opción “BACKCOLOR”.

 

30.-También podemos ponerle una imagen de fondo al formulario en la opción “PICTURE”.

Proyecto 2 visual Basic

"oρεɾმςîoῆ" 

1.- Abrimos Visual Basic
2.- En el proyecto agregamos otro formulario.
3.- Les cambiamos el nombre a los 2 formularios en la opción “caption”el primer formulario con el nombre de ((SUMA)) y el segundo con el nombre de ((RESTA)).
4.- Insertamos 2 objetos en el primer formulario uno con el nombre de ((Clic)) y el otro ((Siguiente)).

5.- Despues damos doble clic en el primer objeto que llamamos (Clic) e insertamos el código:
private sub comman1_clic( )
print "suma "
print"4+8"
print" "
print"resultado"
print 4+8
end sub
6.- Después al segundo objeto de nuestro formulario que es ((siguiente)) le damos doble clic para insertar el código:

private sub comman2_clic ( )
resta.show
end sub
7.- Luego en el formulario 2 insertamos 3 objetos y les pusimos los nombres siguientes ((regresa, clic, salir)).
8.- En el objeto ((regresa)) le damos doble clic para insertar el código:
private sub command3_clic ( )
suma.show
end sub
9.- Después en el segundo objeto del form2 que es ((clic)) le damos doble clic para insertar nuevamente un código:
private sub command4_clic ( )
print "resta"
print "5-5"
print " "
print "resultado"
print 5-5
end sub
10.- Por ultimo a nuestro objeto con el nombre ((salir)) le dimos doble clic y escribimos el codigo:
private sub command5_clic ( )
end
end sub
11.- Ya que en los 2 formularios insertamos todos los objetos con códigos y todo le damos play al proyecto y verificamos que todo este correcto.
12.- Ya que todo este correcto guardamos el proyecto.
13.-. Despues para hacerlo ejecutable, damos clic en el menu achivo después clic en la opción "generar.exe" y le dimos aceptar y guardar como operacion y aceptar.
14.- Para finalizar y ver si todo salió bien cerramos todo y damos clic en el proyecto y no lo abre ejecutable para solo dar clic en los objetos.

Proyecto 1 visual Basic

"šαłυđø"

1.- Abrimos Visual Basic
2.-Creamos un objeto dentro del formulario.
3.- Despues le cambiamos el nombre al objeto en caption, se llamaba command y le pusimos ((Clic)).
4.- Le cambiamos el nombre a nuestro Proyecto, dimos click en proyecto y ahi pusimos el nombre:“SALUDO”.
5.-Des pues damos clic a nuestro 

objeto que se llamaba ((Clic)) y 

nos aparece una ventana donde 

insertamos  el codigo:

private sub comman1_clic( )

print "hola"

end sub

6.-Ejecutamos nuestro proyecto en “PLAY”y cuando le dimos clic en el objeto aparece el mensaje que escribimos… ((hola))