COMPENDIO INFORMÁTICA CICLO V

VISUAL BASIC DESDE EL PROGRAMADOR DE OFFICE

REPASO: HABILITAR EL PROGRAMADOR DE VISUAL BASIC EN MICROSOFT EXCEL

En Excel, lleve a cabo las siguientes acciones:

Haga clic en:

==>Archivo

                ==>Opciones

                               ==>Opciones Personalizadas

==>Programador (se encuentra en el cuadro del lado derecho de la pantalla, al hacer clic en el casilla debe aparecer un visto bueno que habilita esta herramienta)

Luego, en el libro de Excel, en la Barra Superior (Barra de Menú), haga clic en “Programador”. De las opciones que aparecen, haga clic en “Visual Basic”.

ACTIVIDAD PRÁCTICA EN VISUAL BASIC PARA APLICACIONES

Al ingresar a Visual Basic:

Haga clic en:

==>Insertar

                UserForm

Aparecerá en pantalla un UserForm, un Cuadro de Herramientas y una Tabla de Propiedades, tal como se aprecia a continuación:

·         En el Cuadro de Herramientas: Hacer clic sobre Etiqueta y dibujar en el UserForm (formulario) la etiqueta.

·         En la barra de propiedades de la etiqueta, escribir frente a Caption: PRIMER NÚMERO

·         Repetir el procedimiento para insertar otra etiqueta, pero esta vez se escribirá frente a Caption: SEGUNDO NÚMERO

·         Luego, en el Cuadro de Herramientas: Hacer clic sobre Cuadro de Texto y dibujar en el Formulario el cuadro de texto correspondiente al primer y al segundo número.

·         De nuevo, en el cuadro de Herramientas: Hacer clic sobre el Botón de Comando (CommandButton), e insertar en el formulario un Botón (el de SUMA). Escribir frente a Caption: SUMA.

·         Luego, dibujar una etiqueta para el Resultado. Al frente de la etiqueta, dibujar un cuadro de texto.

El formulario deberá ser similar al siguiente:

Por último, hacer doble clic sobre el botón suma y escribir el siguiente código:

Private Sub CommandButton1_Click()                 

a = Val(TextBox1)

b = Val(TextBox2)

TextBox3 = a + b

End Sub

EXPLICACIÓN E INSTRUCTIVO PASO A PASO DEL PROGRAMA EN VB PARA CALCULAR EL IMC

CALCULADORA DE IMC EN VB

RETO POR 50 PUNTOS

Recuerde: Lo que debe hacer es analizar y explicar cada línea del código, o si lo prefiere y tiene computador, hacer este juego o uno nuevo basándose en este.

CÓDIGO PROGRAMACIÓN VB

Private Sub CommandButton1_Click()

Image1.Visible = True

Image2.Visible = False

Image3.Visible = False

End Sub

Private Sub CommandButton2_Click()

Image2.Visible = True

Image1.Visible = False

Image3.Visible = False

End Sub

Private Sub CommandButton3_Click()

Image3.Visible = True

Image2.Visible = False

Image1.Visible = False

End Sub

Private Sub CommandButton4_Click()

TextBox1 = "Proteínas"

TextBox2 = ""

TextBox3 = ""

End Sub

Private Sub CommandButton5_Click()

TextBox2 = "Carbohidratos"

TextBox1 = ""

TextBox3 = ""

End Sub

Private Sub CommandButton6_Click()

TextBox3 = "Grasas Saludables"

TextBox2 = ""

TextBox1 = ""

End Sub

Private Sub CommandButton7_Click()

MsgBox "Muy bien, Felicitaciones"

Image1.Visible = True

Image2.Visible = True

Image3.Visible = True

Image4.Visible = True

TextBox3 = "Grasas Saludables"

TextBox2 = "Carbohidratos"

TextBox1 = "Proteínas"

End Sub

Private Sub CommandButton8_Click()

MsgBox "Te equivocaste"

End Sub

Private Sub CommandButton9_Click()

MsgBox "Te equivocaste"

End Sub

Private Sub CommandButton10_Click()

MsgBox "Te equivocaste"

End Sub

Pistas.

1) Interfaz:

2. Vista en pantalla cuando ejecuto el programa:

Información complementaria:

EJEMPLO ADICIONAL: JUEGO DE PREGUNTAS EN VB