Manual de informatica

Solo disponible en BuenasTareas
  • Páginas : 2 (339 palabras )
  • Descarga(s) : 11
  • Publicado : 14 de junio de 2010
Leer documento completo
Vista previa del texto
[pic]

Alumno :

Vazquez Renteria Luis German

Maestr@:

Olga Maldonado

Materia:

Lenguajes Computacionales

Programas en VB

1. Contraseñas

2. Imagen (Mostrar & Ocultar)3. Tipos de botones (Exclamacion, interogacion, Error & Informacion)

4. Menus (Figuras)

5. Input box (datos personales)

PDARROGAMA | CONTRASEÑA

Programa que sirve paraentrar a un formulario por medio de contraseña, si la contraseña es correcta, entrara, si no lo es, saldrá un msgbox donde dira que la contraseña es incorrecta

[pic]

Codigo:

Boton Entrar:If contraseña.Text = "contraseña" Then
Form1.Visible = False
Form2.Visible = True
Else
Form1.Visible = False
MsgBox "Contraseña incorrecta", vbCritical, "Error"
End
End If

Boton Salir

EndPROGAMA | IMAGEN (MOSTRAR & OCULTAR)

Este programa sirve, para ocultar y mostrar una imagen por medio del código, “visible ”ç

Boton Mostrar

• Picture1.Visible = True

•Picture2.Visible = True

Boton ocultar

• Picture1.Visible = False

• Picture2.Visible = False

Boton Salir

Form1.Visible = False

Mensaje = MsgBox("¿arrancas pal carajo!!??? (S/N)",vbYesNo, "¿Deseas Llegarle??")

If Mensaje = 6 Then

End If

PROGAMA | TIPOS DE BOTONES (EXCLAMACION, INTEROGACION, ERROR & INFORMACION)

Prograa que sirve para utilizar los direfentes comandos• (vbInformation)

• (vbCritical)

• ( vbExclamation)

• ( vbQuestion)

Exclamacion

mensaje = MsgBox("Emo de mierda!!", vbExclamation, "Exclamacion")

Informacionmensaje = MsgBox("Los emos son gay", vbInformation, "Informacion")

Error

mensaje = MsgBox("Los emos hombres son mujeres xD", vbCritical, "Error")

Pregunta?

mensaje = MsgBox("son sexy lasemas?", vbQuestion, "Pregunta")

Pregunta

mensaje = MsgBox("llegarle? (S/N)", vbYesNo, "¿Desea Salir?")

If mensaje = 6 Then

End

Else

Form1.Visible = True

End If

PROGAMA | MENUS...
tracking img