11 Variables

Tema: Variables


Declaración y Asignación de Variables en Visual:

Declaración	Ejemplo asignación contenidos
Dim A As Integer	A = 123
Dim A As Single	A = - 3323.57
Dim A As String	A = “Hay que mejorar”
Dim A As String	A = “123 coches”
Dim A As String	A = “Son 35,37 euros”
Dim Salario As Integer	A = 30500
Dim Salario As Single	A = 30500
Dim Salario As String	A = “Se asignarán 30500 euros”

Ejemplos:

Declaro 2 variables en visual así:

Dim A, B As Integer

Les asigno valores así:

A = 7

B = 4

Asigno a un TextBox el resultado de la suma de ellos así:

TextBox1.Text = A + B

Tema: Vaciar Controles

Para colocar el Blanco un TextBox colocamos:    TextBox1.Text = " "

Para un RadioButton sin estar seleccionado colocamos:    RadioButton1.Checked = False

Para un CheckBox sin estar seleccionado colocamos:     CheckBox1.Checked = False

Desarrolle:

Muestre ¿Cuánto debe pagar el cliente por su orden?. Considerando que los costos de cada producto usted los coloca a criterio propio. 

Debe mostrar el mensaje indicando el Nombre del cliente y de cuanto fue la compra. Además en el botón NUEVA ORDEN al presionarlo debe blanquear todos los controles del Formulario. Y en el Botón SALIR deben colocar en su código ("End"), con este código le decimos al programa que debe cerrar el formulario.

Debe colocar al formulario colores aptos para la vista de todos los usuarios.

NOTA: El Orden de los controles y nombre de las Variables es a criterio Propio.

7 - Parcial No2 (8-8-17)

Colegio Agustiniano Nuestra Señora 

del Buen Consejo

Tecnología - Secundaria

Parcial No2

Indicaciones: Valor Total: 35 ptos.

• Abra una Presentación de Google.
• Temas a Investigar:
• 7A: Top 10 de los animales más peligrosos de Australia.
• 7B: Top 10 de los deportes extremos más peligrosos.

• Formato a aplicar:
• Seleccionar un TEMA a gusto propio o Fondo                      3 ptos.
• Diapositiva de Presentación                                                   3 ptos.
• Aplicar Animaciones                                                              3 ptos.
• Insertar 2 imágenes por diapositivas                                      14 ptos. (2c/diap.)
• Aplicar Transiciones                                                               3 ptos.
• Fuentes Diferentes (título y párrafo)                                       6 ptos.
• Enlace de la diapositiva del Menú                                          5 ptos
• Enlace por cada diapositiva de regreso                                   5 ptos
• Imagen dando las Gracias al final                                           5 ptos.
• Guardar el Archivo                                                                           4 ptos.
• 7A Apellido, Nombre - ParcialNo2-Animales 
• 7B Apellido, Nombre - ParcialNo2-Deportes        
• Puntualidad en la Entrega.                                                                2 ptos

11A Laboratorio No2 - RadioButton (25-7-17)

Colegio Agustiniano Nuestra Señora 

del Buen Consejo

Tecnología - Secundaria

Laboratorio No2

Objetivo: Utilizar diferentes controles en un formulario (Form)

Indicaciones Generales:
1. Crear una carpeta llamada 11A Apellido, Nombre - LabNo2.
2. Crear un proyecto nuevo con una aplicación Windows Form.
3. Coloque el nombre del proyecto: lab2, y la ubicación debe ser la carpeta antes creada.
4. Una vez terminado el Laboratorio, enviar la carpeta creada COMPLETA por Drive.

Siga los siguientes pasos:

1. Diseñe el siguiente WindowsForm:

2. Siga las siguientes indicaciones:

Cuando presionamos por ejemplo el primer botón (Hamburguesa, Papas y Refresco), en los cuadros de texto respectivos aparecerá un 1 en cada una de las tres casillas y en las demás 0, sucesivamente con los demás botones solo se aparecerá 1 en los productos seleccionados y los restantes en 0. Pero todos estos cuadros de texto estarán inhabilitados, es decir, bloqueados (Propiedad Enabled) para que el usuario no pueda cambiar las cantidades.

El último RadioButton (Otras Opciones), será el único en donde el usuario podrá insertar las cantidades a comprar de cada producto, es decir, que todas las cajas de texto deben estar habilitadas o desbloqueadas.

Al utilizar el botón de Pagar, en el cuadro de texto de Subtotal aparecerá la suma de los precios, de los productos seleccionados. Automáticamente calculará el IVA del 16% en la casilla respectiva sobre el Subtotal, apareciendo la suma del Subtotal más el IVA en la Casilla de Total a Pagar.

Nota: No se trabajara en las 2 cajas de texto de Pago y Cambio (Si desean las pueden eliminar).

Ejemplos de los códigos:

- Para colocar las cajas de texto inhabilitadas: Deben dar doble clic sobre el Formulario y colocar el siguiente código:

             TextBox1.Enabled = False

             TextBox2.Enabled = False

             TextBox3.Enabled = False

             TextBox4.Enabled = False

             TextBox5.Enabled = False

             TextBox6.Enabled = False

             TextBox7.Enabled = False

             TextBox8.Enabled = False

             TextBox9.Enabled = False

             TextBox10.Enabled = False

             TextBox11.Enabled = False

- Lo siguiente se trabaja en el Botón "PAGAR"

- Para colocar 1 a las celdas correspondientes:

If RadioButton1.checked = true then

             TextBox1.text = 1

             TextBox2.text = 1

             TextBox3.text = 1

             TextBox4.text = 0

             TextBox5.text = 0

             TextBox6.text = 0

             TextBox7.text = 0

             TextBox8.text = 0

IfElse RadioButton2.checked = True then

            (Así seguirán sucesivamente van cambiando los 0 y 1 hasta completar todos los radiobuttons)

EndIf

- En la opción del RadioButton de habilitar todas las cajas de texto, tendría que copiar el código empleado para inhabilitar solo que cambiando su valor a TRUE, sobre las primeros 8 cajas de texto.

- Luego de terminar de trabajar con TODOS los RadioButtons, se procede a trabajar  los cálculos solicitados, de la siguiente manera:

SubTotal.Text = Val(Textbox1.text)*35.00 + Val(Textbox2.text)*15.00 + (Así sucesivamente hasta terminar con TODOS los textbox correspondientes)

Nota: En el código antes descrito lo que se busca es encontrar el total de los productos comprados, evidentemente cuando el textbox tenga 0 (cero) al multiplicar su valor sera 0 y no afectará a los demás.

Iva.Text (Ya lo saben calcular)

Total.text (Ya lo saben calcular)

8A Prácticas Adicionales (Contar.Si y Sumar.SI) (26-7-17)

Prácticas Adicionales

Temas: Contar.Si y Sumar.Si

Indicaciones Generales:

• Abra el Archivo PracticaAdicionalNo2-A.
• Una vez terminadas todas las asignaciones, guarde el archivo con el nombre 
• 8A Apellido, Nombre - PracticaAdic_CS-Si
• Enviar por DRIVE

Problema No1. Contar.Si

En la primera hoja llamada Problema No1 tendremos una tabla con una serie de valores de los cuales queremos saber de la primera columna cuántos son A, AA y AAA. Y de la segunda columna cuántos son B, BB y BBB. Completar las pequeñas tablas que allí les aparece.

Problema No2. Contar.Si

Dada la Tabla resultante por los resultados de un Examen de Admisión, responda  a las interrogantes planteadas.

Problema No3. Sumar.Si

Responder a las Interrogantes planteadas en el propio documento

11B Laboratorio No2 - RadioButton (25-7-17)

Colegio Agustiniano Nuestra Señora 

del Buen Consejo

Tecnología - Secundaria

Laboratorio No2

Objetivo: Utilizar diferentes controles en un formulario (Form)

Indicaciones Generales:
1. Crear una carpeta llamada 11B Apellido, Nombre - LabNo2.
2. Crear un proyecto nuevo con una aplicación Windows Form.
3. Coloque el nombre del proyecto: lab2, y la ubicación debe ser la carpeta antes creada.
4. Una vez terminado el Laboratorio, enviar la carpeta creada COMPLETA por Drive.

Siga los siguientes pasos:

1. Diseñe el siguiente WindowsForm:

2. Siga las siguientes indicaciones:

Cuando presionamos por ejemplo el primer botón (Filete, Arroz Blanco, Ensalada), en los cuadros de texto respectivos aparecerá un 1 en cada una de las tres casillas y en las demás 0, sucesivamente con los demás botones solo se aparecerá 1 en los productos seleccionados y los restantes en 0. Pero todos estos cuadros de texto estarán inhabilitados, es decir, bloqueados (Propiedad Enabled) para que el usuario no pueda cambiar las cantidades.

El último RadioButton (Otras Opciones), será el único en donde el usuario podrá insertar las cantidades a comprar de cada producto, es decir, que todas las cajas de texto deben estar habilitadas o desbloqueadas.

Al utilizar el botón de Pagar, en el cuadro de texto de Subtotal aparecerá la suma de los precios, de los productos seleccionados. Automáticamente calculará el IVA del 16% en la casilla respectiva sobre el Subtotal, apareciendo la suma del Subtotal más el IVA en la Casilla de Total a Pagar.

Nota: No se trabajara en las 2 cajas de texto de Pago y Cambio (Si desean las pueden eliminar).

Ejemplos de los códigos:

- Para colocar las cajas de texto inhabilitadas: Deben dar doble clic sobre el Formulario y colocar el siguiente código:

             TextBox1.Enabled = False

             TextBox2.Enabled = False

             TextBox3.Enabled = False

             TextBox4.Enabled = False

             TextBox5.Enabled = False

             TextBox6.Enabled = False

             TextBox7.Enabled = False

             TextBox8.Enabled = False

             TextBox9.Enabled = False

             TextBox10.Enabled = False

             TextBox11.Enabled = False

- Lo siguiente se trabaja en el Botón "PAGAR"

- Para colocar 1 a las celdas correspondientes:

If RadioButton1.checked = true then

             TextBox1.text = 1

             TextBox2.text = 1

             TextBox3.text = 1

             TextBox4.text = 0

             TextBox5.text = 0

             TextBox6.text = 0

             TextBox7.text = 0

             TextBox8.text = 0

IfElse RadioButton2.checked = True then

            (Así seguirán sucesivamente van cambiando los 0 y 1 hasta completar todos los radiobuttons)

EndIf

- En la opción del RadioButton de habilitar todas las cajas de texto, tendría que copiar el código empleado para inhabilitar solo que cambiando su valor a TRUE, sobre las primeros 8 cajas de texto.

- Luego de terminar de trabajar con TODOS los RadioButtons, se procede a trabajar  los cálculos solicitados, de la siguiente manera:

SubTotal.Text = Val(Textbox1.text)*0.90 + Val(Textbox2.text)*0.30 + (Así sucesivamente hasta terminar con TODOS los textbox correspondientes)

Nota: En el código antes descrito lo que se busca es encontrar el total de los productos comprados, evidentemente cuando el textbox tenga 0 (cero) al multiplicar su valor sera 0 y no afectará a los demás.

Iva.Text (Ya lo saben calcular)

Total.text (Ya lo saben calcular)

7 Taller No2 (25-7-17)

Colegio Agustiniano Nuestra Señora 

del Buen Consejo

Tecnología - Secundaria

Taller No2

Indicaciones: Valor Total: 35 ptos.

• Abra una Presentación de Google.
• Temas a Investigar:
• 7A: Sitios Turísticos de la Provincia de Herrera.
• 7B: Sitios Turísticos de la Provincia de Los Santos.

• Seleccionar como mínimo 7 sitios turísticos de la región que le corresponde. 
• Formato a aplicar:
• Seleccionar un TEMA a gusto propio o Fondo                      3 ptos.
• Diapositiva de Presentación                                                   3 ptos.
• Aplicar Animaciones                                                              3 ptos.
• Insertar 2 imágenes por diapositivas                                      14 ptos. (2c/diap.)
• Aplicar Transiciones                                                               3 ptos.
• Fuentes Diferentes (título y párrafo)                                       6 ptos.
• Enlace de la diapositiva del Menú                                          5 ptos
• Enlace por cada diapositiva de regreso                                   5 ptos
• Imagen Gif dando las Gracias al final                                    5 ptos.
• Guardar el Archivo                                                                           4 ptos.
• 7A Apellido, Nombre - TallerNo1-PHerrera 
• 7B Apellido, Nombre - TallerNo1-PLosSanto        
• Puntualidad en la Entrega.                                                                2 ptos

10 ParcialNo2 CuadroXCuadro (26-7-17)

Colegio Agustiniano Nuestra Señora 

del Buen Consejo

Tecnología - Secundaria

Parcial No2

Objetivos:

• Trabajar con la animación Cuadro por Cuadro.

10A - Animación Cuadro por Cuadro. Valor: 50 pts.

• Utilizando toda su creatividad, realice la simulación del juego del TETRI Vertical.
• En la animación deberán incorporar los elementos estándares que componen el juego original, con los colores que usted crea conveniente. NOTA: Los elementos estándares se mostrarán en la Figura No1.
• Emplee todo el escenario para el juego. Utilice la cantidad de frames que necesite.
• Guarde el archivo con el nombre 10A Apellido, Nombre - ParcialNo2_TETRI-V.

Ítems	Valor
Creatividad 5 pts. Fondo (involucrar la parte del puntaje, observar Figura No2), 5 pts. Figuras (deben crear las figuras estándares necesaria, sugerencia convertir todo a símbolo gráfico) 5 pts. Puntaje (Por cada fila completada se generan 5 ptos del juego, por lo que deberán llevar el puntaje del mismo) 5 pts. Final del juego (Ya sea que ocurra un Game Over con puntos o que pase por cierta cantidad de puntos al segundo nivel.)	20
Uso correcto de la animación Cuadro por Cuadro. Mínimo se aceptarán 30 frames, donde se deban completar 5 filas completas y llegue al Game Over	30
Valor Final	50

Figura No1

  Figura No2

10B - Animación Cuadro por Cuadro. Valor: 50 pts.

• Utilizando toda su creatividad, realice la simulación del juego del TETRI Horizontal.
• En la animación deberán incorporar los elementos estándares que componen el juego original, con los colores que usted crea conveniente. NOTA: Los elementos estándares se mostrarán en la Figura No1.
• Emplee todo el escenario para el juego. Utilice la cantidad de frames que necesite.
• Guarde el archivo con el nombre 10B Apellido, Nombre - ParcialNo2_TETRI-H.

Ítems	Valor
Creatividad 5 pts. Fondo (involucrar la parte del puntaje, observar Figura No2), 5 ptos. Figuras (deben crear las figuras estándares necesaria, sugerencia convertir todo a símbolo gráfico) 5 ptos. Puntaje (Por cada fila completada se generan 5 ptos del juego, por lo que deberán llevar el puntaje del mismo) 5 pts. Final del juego (Ya sea que ocurra un Game Over con puntos o que pase por cierta cantidad de puntos al segundo nivel.)	20
Uso correcto de la animación Cuadro por Cuadro. Mínimo se aceptarán 30 frames, donde se deban completar 5 filas completas y llegue al Game Over	30
Valor Final	50

10 TallerNo2-PACMAN_GALAGA (20-7-17)

Colegio Agustiniano Nuestra Señora 

del Buen Consejo

Tecnología - Secundaria

Taller No1

Objetivos:

• Trabajar con la animación Cuadro por Cuadro.

10A - Animación Cuadro por Cuadro. Valor: 50 pts.

• Utilizando toda su creatividad, realice la simulación del juego del PACMAN.
• En la animación deberán incorporar a los fantasmitas, 3 en total.
• Emplee todo el escenario para el juego. Utilice la cantidad de frames que necesite.
• Guarde el archivo con el nombre 10A Apellido, Nombre - Pacman-CxC.

Ítems	Valor
Creatividad                    5 pts. Fondo (laberinto con sus puntos amarillos), 5 ptos. PacMan (deben crear un PacMan con la boca cerrada y otro con la boca abierta, que se vea bien ese movimiento)                    5 ptos. Colocar complejidad en el juego,                    5 pts. Colores	20
Uso correcto de la animación Cuadro por Cuadro (El PacMan debe comerse todos los puntos)	30
Valor Final	50

10B - Animación Cuadro por Cuadro. Valor: 50 pts.

• Utilizando toda su creatividad, realice la simulación del juego del GALAGA.
• En la animación deberán incorporar ya sean navesitas, frutitas, o lo que usted crea conveniente.
• Emplee todo el escenario para el juego. Utilice la cantidad de frames que necesite.
• Guarde el archivo con el nombre 10B Apellido, Nombre - Galaga-CxC.



Ítems	Valor
Creatividad                    5 pts. Fondo (espacio), 5 ptos. Nave Principal                    5 ptos. Colocar complejidad en el juego,                    5 pts. Colores	20
Uso correcto de la animación Cuadro por Cuadro (el juego Galaga, termia depende a su criterio)	30
Valor Final	50

11 Controles CheckBox y RadioButton (Variables)

Aquí falta en Botón Calcular.