Operaciiion Mensajeee

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:

27.- Ya que insertamos los objetos les podemos cambiar el tipo de letra, y el tamaño en la opción “FONT” y ponerle color al formulario en la opción “BACKCOLOR” ,

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

29-Al final solo lo guardamos y terminamos.

 

SaluudoO**

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))

OperaciiOon

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

Holaaa...

wii  ehehe creeadOo mii blooggeerr