Preparatoria

PRACTICA 1
INTRODUCCIÓN A LA PROGRAMACIÓN EN VISUAL BASIC

1.- OBJETIVO: Al finalizar la práctica el alumno elaborará un programa en visual Basic que muestre una ventana con un botón interactivo que muestre un mensaje de texto.

2. PROCEDIMIENTO:
* Instalar en una computadora el programa Visual Basic.
* Abrir el programa Microsoft Visual Basic 6.0 y seleccionar la aplicación EXEestándar en la ventana de Nuevo Proyecto.
* Seleccionar el icono de Botón de comando y colocarlo en el formulario.
* Seleccionar un cuadro de texto y colocarlo en el formulario.
* Seleccionar en el formulario el botón de comando.
* En la ventana de propiedades cambiar la opción Caption por “Inicio”.
* Seleccionar el cuadro de texto y en la ventana de propiedades, cambiarText1 por HOLA MUNDO.
* Cambiar la propiedad Visible a False.
* Dar doble click sobre el botón de comando.
* En la ventana de Código teclear Text1.Visible=True.
* Correr el programa con el icono de Iniciar.
* En la ventana de propiedades de Form1 cambiar BackColor y correr el programa.
* Cambiar la propiedad Caption de Fort1 a “PROGRAMA 1”.
* Modificar algunas otraspropiedades y visualizar el resultado corriendo el programa.
* En el menú Archivo seleccionar Generar proyecto.
* Correr el programa desde el explorador de Windows.

PRACTICA 2
MANEJO DE BOTONES, ETIQUETAS E IMÁGENES

1.- OBJETIVO: Al finalizar la práctica el alumno elaborará un programa en visual Basic que muestre una ventana con botones interactivos, ventanas giratorias, un rótulodescriptivo y una ventana que muestre un gráfico alusivo.
2. PROCEDIMIENTO:
* Desplegar el menú Archivo y seleccionar la opción Nuevo Proyecto.
* Pulsar el botón Aceptar para crear una aplicación estándar.
* Introduzca dos botones, cuatro etiquetas y una imagen como se muestra en la figura siguiente

* Modifique las propiedades de las herramientas de acuerdo a la tabla siguiente:Objeto | Propiedad | Valor |
Command1 | Caption | Jugar |
Command2 | Caption | Fin |
Label1, Label2 | BorderStyle | 1-Fixed Single |
Label3 | Alignment | 2-Center |
| Font | Times New Roman Negrita, 24 puntos |
| Caption | (Vacío) |

Objeto | Propiedad | Valor |
Label4 | Caption | Siete Afortunado |
| Font | Arial Negrita, 14 puntos |
| ForeColor | Morado oscuro(&H008000808) |
Image1 | Picture | (path del archivo) |
| Stretch | True |
| Visible | False |

* Escribir el código asociado que se muestra a continuación:

Private Sub Command1_Click()
Image1.Visible = False ' ocultar monedas
Label1.Caption = Int(Rnd * 10) ' generar números
Label2.Caption = Int(Rnd * 10)
Label3.Caption = Int(Rnd * 10)
'si algúnnúmero es 7 mostrar una pila de monedas y pitar
If (Label1.Caption = 7) Or (Label2.Caption = 7) _
Or (Label3.Caption = 7) Then
Image1.Visible = True
Beep
End If
End Sub

Private Sub Command2_Click()
End
End Sub
* Despliegue el menú Archivo y seleccione la opción Guardar Proyecto Como
* Ejecute el programa pulsando el botón Iniciar que está en labarra de herramientas.
* Verifique el correcto funcionamiento del programa y si hay errores depure el programa.
PRACTICA 3
USO DE LOS OBJETOS DEL SISTEMA DE ARCHIVOS

1.- OBJETIVO: Al finalizar la práctica el alumno elaborará un programa en visual Basic que use los objetos del sistema de archivos.
2. PROCEDIMIENTO:
* Desplegar el menú Archivo y seleccionar la opción Nuevo Proyecto.* Pulsar el botón Aceptar para crear una aplicación estándar.
* Introduzca los objetos que se muestra en la figura siguiente

* Escribir el código asociado que se muestra a continuación:
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
======================================================
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub...