Fecha: Octubre 24 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor: Tolerancia
Núcleo Integrador: Compartir archivos en la web.
Objetivo: Crear documentos en línea.
Taller: desarrolle una presentación sobre los "Procesos productivos de artefactos tecnológicos"
Tenga en cuenta:
Debe ser una presentación de Gmail.
Recuerde, para crear una presentación en gmail, siga los siguientes pasos:
1. Active el DRIVE de Gmail.
2. Botón crear.
3. Seleccione Presentación.
4. Comience a desarrollar su presentación.
5. El nombre de la presentación debe ser:
11A-JENNIFER PALOMINO-PROCESOS PRODUCTIVOS
NOTA: Debe entregar a mas tardar el día viernes 24 de octubre, tanto la presentación como el Blog que esta pendiente.
Comparta la presentación con el correo betpadi@gmail.com y el enlace del blog, envíelo al mismo correo.
lunes, 20 de octubre de 2014
Compartir archivos en la Web
Fecha: Octubre 20 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor: Tolerancia
Núcleo Integrador: Compartir archivos en la web.
Objetivo: Crear documentos en línea.
Taller: desarrolle una presentación sobre los "Procesos productivos de artefactos tecnológicos"
Tenga en cuenta:
Debe ser una presentación de Gmail.
Recuerde, para crear una presentación en gmail, siga los siguientes pasos:
1. Active el DRIVE de Gmail.
2. Botón crear.
3. Seleccione Presentación.
4. Comience a desarrollar su presentación.
5. El nombre de la presentación debe ser:
11A-JENNIFER PALOMINO-PROCESOS PRODUCTIVOS
NOTA: Debe entregar a mas tardar el día viernes 24 de octubre, tanto la presentación como el Blog que esta pendiente.
Comparta la presentación con el correo betpadi@gmail.com y el enlace del blog, envíelo al mismo correo.
Asignatura: Tecnología e Informática.
Formación en Valor: Tolerancia
Núcleo Integrador: Compartir archivos en la web.
Objetivo: Crear documentos en línea.
Taller: desarrolle una presentación sobre los "Procesos productivos de artefactos tecnológicos"
Tenga en cuenta:
Debe ser una presentación de Gmail.
Recuerde, para crear una presentación en gmail, siga los siguientes pasos:
1. Active el DRIVE de Gmail.
2. Botón crear.
3. Seleccione Presentación.
4. Comience a desarrollar su presentación.
5. El nombre de la presentación debe ser:
11A-JENNIFER PALOMINO-PROCESOS PRODUCTIVOS
NOTA: Debe entregar a mas tardar el día viernes 24 de octubre, tanto la presentación como el Blog que esta pendiente.
Comparta la presentación con el correo betpadi@gmail.com y el enlace del blog, envíelo al mismo correo.
domingo, 21 de septiembre de 2014
Entradas en un Blog
Fecha: Septiembre 22 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor: Amor y Amistad.
Núcleo Integrador: Entradas en un Blog
Núcleo Integrador: Entradas en un Blog
Objetivo: Definir una entrada en forma de Tutorial.
Taller: Desarrolle una entrada en su Blog que permita explicar un proceso, con mínimo cinco pasos, cada paso debe tener una imagen y explicar dicho paso.
Taller: Desarrolle una entrada en su Blog que permita explicar un proceso, con mínimo cinco pasos, cada paso debe tener una imagen y explicar dicho paso.
lunes, 15 de septiembre de 2014
Configuración de un Blog
Fecha: Septiembre 15 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor: Amor y Amistad.
Núcleo Integrador: Configuración de un Blog
Núcleo Integrador: Configuración de un Blog
domingo, 7 de septiembre de 2014
Contenidos libres (Blogs).
Fecha: Septiembre 8 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor: Amor y Amistad.
Núcleo Integrador: Contenidos Libres (Blog).
Núcleo Integrador: Contenidos Libres (Blog).
Objetivo: Publicar contenidos libres en la Web.
Eje Curricular: Contenidos Libres.
Estándar de desempeño:
- Manifiesto destreza en la asistencia remota de computadores utilizando Internet.
- Evalúo los procesos productivos de diversos artefactos y sistemas tecnológicos, teniendo en cuenta sus efectos sobre el medio ambiente y las comunidades implicadas.
Núcleos Integradores IV Periodo
- Contenidos libres (Blogs).
- Configuración de un Blog.
- Entradas en un Blog.
- Compartir archivos en la web.
Presione Clic para ir al enlace Crear un Blog
Taller:
Desarrolle un Mapa Conceptual que explique las siguientes preguntas:
1. ¿Qué es un Blog?
2. Características de un Blog.
3. Ventajas que ofrece un Blog.
4. Desventajas de un Blog.
5. Como beneficia un Blog el proceso de enseñanza aprendizaje.
Enviar en archivo adjunto al correo: betpadi@gmail.com
En el asunto debe escribir: Curso - Taller Blogs - Nombre estudiante.
Ejemplo: 11B - Taller Blogs - Jennifer Palomino
Nota: Correo que no tenga estas características no lo abro para leerlo y por lo tanto no me lo ha enviado.
Máximo: Lunes 20 de septiembre a las 24 horas.
Nota:
Para la Segunda Nota del Cuarto periodo se debe crear una cuenta en gmail, para la próxima clase.
jueves, 21 de agosto de 2014
Menús
Fecha: Septiembre 1 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor: Amor y Amistad
Núcleo Integrador: Menús.
Objetivo: Crear menús para mostrar diferentes ventanas en un programa.
Editor de Menús
Permite crear un menú
Modelo de Menús
Taller: Consulte cómo crear Menús en Visual Basic 6.0 y cree un Menú que ejecute dos o más Form (Formularios).
Fecha: Septiembre 1 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor: Amor y Amistad
Núcleo Integrador: Analizar, comparar y buscar soluciones a problemas..
Objetivo: Identificar un problema y como se ha solucionado utilizando tecnología.
Taller: desarrolle un trabajo escrito utilizando diapositivas, que explique como se ha solucionado dos problemas utilizando tecnología, ejemplo:
Problema: En tiempos anteriores, los docentes sufrían de problemas en la piel, pues la tiza que utilizaban le causaban daños en la piel, como salpullidos y otros.
Solución, se crea el marcador borrable y el tablero acrílico, explico sus beneficios.
Caracteristicas:
1, Diapositiva, hoja de presentación.
2. Indicar el primer problema.
3. Indicar solución al primer problema.
4. Indicar el segundo problema.
5. Indicar solución al segundo problema.
Asignatura: Tecnología e Informática.
Formación en Valor: Amor y Amistad
Núcleo Integrador: Menús.
Objetivo: Crear menús para mostrar diferentes ventanas en un programa.
Editor de Menús
Permite crear un menú
Modelo de Menús
Taller: Consulte cómo crear Menús en Visual Basic 6.0 y cree un Menú que ejecute dos o más Form (Formularios).
Fecha: Septiembre 1 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor: Amor y Amistad
Núcleo Integrador: Analizar, comparar y buscar soluciones a problemas..
Objetivo: Identificar un problema y como se ha solucionado utilizando tecnología.
Taller: desarrolle un trabajo escrito utilizando diapositivas, que explique como se ha solucionado dos problemas utilizando tecnología, ejemplo:
Problema: En tiempos anteriores, los docentes sufrían de problemas en la piel, pues la tiza que utilizaban le causaban daños en la piel, como salpullidos y otros.
Solución, se crea el marcador borrable y el tablero acrílico, explico sus beneficios.
Caracteristicas:
1, Diapositiva, hoja de presentación.
2. Indicar el primer problema.
3. Indicar solución al primer problema.
4. Indicar el segundo problema.
5. Indicar solución al segundo problema.
Las diapositivas deben tener:
- Transiciones.
- Animaciones aplicadas a imágenes y texto.
jueves, 14 de agosto de 2014
Control Timer
Fecha: Agosto 15 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor:Libertad
Núcleo Integrador: Control Timer.
Objetivo: Desarrollar un control de Tiempo
Control Timer
Este control se activa por intervalos de tiempo.
Sus propiedades son:
Interval: Especifica el intervalo de tiempo en que se activa el control.
Objetos que deben agregar al formulario:
Private Sub Form_Load()
'Indica el intervalo de tiempo, 100 milésimas de segundo
Timer1.Interval = 100
Timer2.Interval = 100
'Ancho y alto del formulario
Me.Width = 16000
Me.Height = 10000
'ubica el formulario arriba
Me.Top = 0
'Cambia el tipo de letra, su tamaño
Label1.Font.Name = "Magneto"
Label1.Font.Size = 100
'Auto ajusta el Label al tamaño de la letra
Label1.AutoSize = True
End Sub
Private Sub Timer1_Timer()
'Muestra la hora en el Label
Label1 = Time
End Sub
Private Sub Timer2_Timer()
'Se declara la Variable entera y Static es para que conserve el valor.
Static Numero As Integer
'Aumenta el valor de 1 en 1
Numero = Numero + 1
'Muestra la imagen
Image1.Picture = LoadPicture(App.Path + "\caballo" + Trim(Str(Numero)) + ".jpg")
If Numero = 8 Then
Numero = 0
End If
End Sub
NOTA: Presione F5 y vea el resultado.
TALLER: Teniendo en cuenta el Taller anterior, descargue, imágenes que tengan una secuencia y cambie la linea Image1.Picture = LoadPicture(App.Path + "\caballo" + Trim(Str(Numero)) + ".jpg")
Adaptando al nombre del archivo que acabas de descargar.
Asignatura: Tecnología e Informática.
Formación en Valor:Libertad
Núcleo Integrador: Control Timer.
Objetivo: Desarrollar un control de Tiempo
Control Timer
Este control se activa por intervalos de tiempo.
Sus propiedades son:
Interval: Especifica el intervalo de tiempo en que se activa el control.
Objetos que deben agregar al formulario:
Control Timer
Label
Image
Adicione:
2 Control Timer
1 Label
1 Image
Debe quedar el formulario Así:
Grabe el Formulario y el Proyecto en una carpeta y copie estas 8 imágenes a esa misma carpeta: Deben tener el Nombre:
Caballo1.jpg, Caballo2.jpg, Caballo3.jpg, Caballo4.jpg, Caballo5.jpg, Caballo6.jpg, Caballo7.jpg, Caballo8.jpg,
Luego copie el código y ejecute el programa.
'Indica el intervalo de tiempo, 100 milésimas de segundo
Timer1.Interval = 100
Timer2.Interval = 100
'Ancho y alto del formulario
Me.Width = 16000
Me.Height = 10000
'ubica el formulario arriba
Me.Top = 0
'Cambia el tipo de letra, su tamaño
Label1.Font.Name = "Magneto"
Label1.Font.Size = 100
'Auto ajusta el Label al tamaño de la letra
Label1.AutoSize = True
End Sub
Private Sub Timer1_Timer()
'Muestra la hora en el Label
Label1 = Time
End Sub
Private Sub Timer2_Timer()
'Se declara la Variable entera y Static es para que conserve el valor.
Static Numero As Integer
'Aumenta el valor de 1 en 1
Numero = Numero + 1
'Muestra la imagen
Image1.Picture = LoadPicture(App.Path + "\caballo" + Trim(Str(Numero)) + ".jpg")
If Numero = 8 Then
Numero = 0
End If
End Sub
NOTA: Presione F5 y vea el resultado.
TALLER: Teniendo en cuenta el Taller anterior, descargue, imágenes que tengan una secuencia y cambie la linea Image1.Picture = LoadPicture(App.Path + "\caballo" + Trim(Str(Numero)) + ".jpg")
Adaptando al nombre del archivo que acabas de descargar.
jueves, 24 de julio de 2014
Instructivo Prueba Piloto ICFES - 2014-07-24
Para ingresar a la prueba del Colegio Eucarístico de Santa
Teresa debe escribir la siguiente dirección:
http://p55.icfes.gov.co/piloto
El login o Usuario es: p_025701 hasta p_025794, para asignar
su usuario deben tener en cuenta el número de su computador así:
Computador 1: p_025701
Computador 2: p_025702
Computador 3: p_025703
….
Computador 10: p_025710
Computador 11: p_025711
….
Computador 43: p_025743
La
contraseña es:
icfes
domingo, 20 de julio de 2014
ListBox
Fecha: Julio-21-2014
Asignatura: Tecnología e Informática.
Formación en Valor: Autonomía.
Núcleo Integrador: ListBox.
Objetivo: Programar listas.
ListBox: Este objeto nos permite mostrar una lista de opciones
Ejercicio Diseña el siguiente formulario:
Copia el siguiente código y muestra el resultado con F5.
Dim x As Integer
Private Sub Command1_Click()
If List1.ListIndex = -1 Then
MsgBox "Seleccione el elemento", vbInformation, "ListBox"
Else
List2.AddItem List1.Text
List1.RemoveItem List1.ListIndex
End If
End Sub
Private Sub Command2_Click()
If List1.ListIndex = -1 Then
MsgBox "Seleccione el elemento", vbInformation, "ListBox"
Else
For x = 0 To List1.ListCount
List2.AddItem List1.List(x)
Next x
List1.Clear
End If
End Sub
Private Sub Command3_Click()
If List2.ListIndex = -1 Then
MsgBox "Seleccione el elemento", vbInformation, "ListBox"
Else
List1.AddItem List2.Text
List2.RemoveItem List2.ListIndex
End If
End Sub
Private Sub Command4_Click()
If List2.ListIndex = -1 Then
MsgBox "Seleccione el elemento", vbInformation, "ListBox"
Else
For x = 0 To List2.ListCount
List1.AddItem List2.List(x)
Next x
List2.Clear
End If
End Sub
Private Sub Form_Load()
List1.AddItem "ELEMENTO 1"
List1.AddItem "ELEMENTO 2"
List1.AddItem "ELEMENTO 3"
List1.AddItem "ELEMENTO 4"
End Sub
Taller:
Teniendo en cuenta el ejercicio anterior, desarrolle un programa que permita realizar una venta de diferentes artículos.
Nota: analice como utilizaría usted el siguiente código para incorporarlo en su nuevo programa.
Private Sub List1_Click()
Select Case List1.ListIndex
Case 0
Label1 = 100
Case 1
Label1 = 200
Case 2
Label1 = 150
Case 3
Label1 = 500
End Select
End Sub
Asignatura: Tecnología e Informática.
Formación en Valor: Autonomía.
Núcleo Integrador: ListBox.
Objetivo: Programar listas.
ListBox: Este objeto nos permite mostrar una lista de opciones
Ejercicio Diseña el siguiente formulario:
Copia el siguiente código y muestra el resultado con F5.
Dim x As Integer
Private Sub Command1_Click()
If List1.ListIndex = -1 Then
MsgBox "Seleccione el elemento", vbInformation, "ListBox"
Else
List2.AddItem List1.Text
List1.RemoveItem List1.ListIndex
End If
End Sub
Private Sub Command2_Click()
If List1.ListIndex = -1 Then
MsgBox "Seleccione el elemento", vbInformation, "ListBox"
Else
For x = 0 To List1.ListCount
List2.AddItem List1.List(x)
Next x
List1.Clear
End If
End Sub
Private Sub Command3_Click()
If List2.ListIndex = -1 Then
MsgBox "Seleccione el elemento", vbInformation, "ListBox"
Else
List1.AddItem List2.Text
List2.RemoveItem List2.ListIndex
End If
End Sub
Private Sub Command4_Click()
If List2.ListIndex = -1 Then
MsgBox "Seleccione el elemento", vbInformation, "ListBox"
Else
For x = 0 To List2.ListCount
List1.AddItem List2.List(x)
Next x
List2.Clear
End If
End Sub
Private Sub Form_Load()
List1.AddItem "ELEMENTO 1"
List1.AddItem "ELEMENTO 2"
List1.AddItem "ELEMENTO 3"
List1.AddItem "ELEMENTO 4"
End Sub
Teniendo en cuenta el ejercicio anterior, desarrolle un programa que permita realizar una venta de diferentes artículos.
Nota: analice como utilizaría usted el siguiente código para incorporarlo en su nuevo programa.
Private Sub List1_Click()
Select Case List1.ListIndex
Case 0
Label1 = 100
Case 1
Label1 = 200
Case 2
Label1 = 150
Case 3
Label1 = 500
End Select
End Sub
jueves, 10 de julio de 2014
ComboBox
Cumpliendo con los temas de tecnologías programados para el segundo periodo se debe realizar la siguiente consulta:
Desarrolle un documento en PowerPoint que explique:
1. Cuales son las Herramientas para procesar y buscar información.
2. Que utilidad tienen las herramientas para procesar y buscar información.
3. Describa dos ejemplos en los cuales usted pueda utilizar estas herramientas.
Características para entregar el trabajo:
1. Nombre del archivo: Herramientas para buscar y procesar información.
2. Correo para enviar, el asunto es:
11(ABC)-Nombre Estudiante - Herramientas para Buscar
Ejemplo: 11A-Jennifer Palomino-Herramientas para Buscar.
3. Enviar a: betpadi@gmail.com.
4. Plazo máximo de entrega: próxima clase.
Nota: Estudiante que no envié la información como lo indican los puntos 1 y 2, se descuentan 20 puntos.
Fecha: Julio 14 de 2014.
Asignatura: Tecnología e Informática.
Formación en Valor: Autonomía
Núcleo Integrador: ComboBox
Objetivo: Programar las listas desplegables.
COMBOBOX
Permite crear listas desplegables.
Agregue 2 comboBox al Formulario
y escriba el siguiente código
Private Sub Combo1_Click()
Combo2.Clear
Select Case Combo1.ListIndex
Case 0
Combo2.AddItem "CARTAGENA"
Combo2.AddItem "TURBACO"
Case 1
Combo2.AddItem "BARRANQUILLA"
Combo2.AddItem "BARANOA"
Case 2
Combo2.AddItem "SANTA MARTA"
Combo2.AddItem "CIENAGA"
End Select
End Sub
Private Sub Form_Load()
Combo1.Clear
Combo2.Clear
Combo1.AddItem "BOLIVAR"
Combo1.AddItem "ATLANTICO"
Combo1.AddItem "MAGDALENA"
End Sub
Presione F5 y pruebe el programa.
Analice que el segundo ComboBox depende de la selección del primer ComboBox, teniendo en cuenta lo anterior, desarrolle el siguiente Taller:
TALLER.
Desarrolle un programa donde aplique lo aprendido con 2 COMBOBOX
Desarrolle un documento en PowerPoint que explique:
1. Cuales son las Herramientas para procesar y buscar información.
2. Que utilidad tienen las herramientas para procesar y buscar información.
3. Describa dos ejemplos en los cuales usted pueda utilizar estas herramientas.
Características para entregar el trabajo:
1. Nombre del archivo: Herramientas para buscar y procesar información.
2. Correo para enviar, el asunto es:
11(ABC)-Nombre Estudiante - Herramientas para Buscar
Ejemplo: 11A-Jennifer Palomino-Herramientas para Buscar.
3. Enviar a: betpadi@gmail.com.
4. Plazo máximo de entrega: próxima clase.
Nota: Estudiante que no envié la información como lo indican los puntos 1 y 2, se descuentan 20 puntos.
Fecha: Julio 14 de 2014.
Asignatura: Tecnología e Informática.
Formación en Valor: Autonomía
Núcleo Integrador: ComboBox
Objetivo: Programar las listas desplegables.
COMBOBOX
Permite crear listas desplegables.
Agregue 2 comboBox al Formulario
y escriba el siguiente código
Private Sub Combo1_Click()
Combo2.Clear
Select Case Combo1.ListIndex
Case 0
Combo2.AddItem "CARTAGENA"
Combo2.AddItem "TURBACO"
Case 1
Combo2.AddItem "BARRANQUILLA"
Combo2.AddItem "BARANOA"
Case 2
Combo2.AddItem "SANTA MARTA"
Combo2.AddItem "CIENAGA"
End Select
End Sub
Private Sub Form_Load()
Combo1.Clear
Combo2.Clear
Combo1.AddItem "BOLIVAR"
Combo1.AddItem "ATLANTICO"
Combo1.AddItem "MAGDALENA"
End Sub
Presione F5 y pruebe el programa.
Analice que el segundo ComboBox depende de la selección del primer ComboBox, teniendo en cuenta lo anterior, desarrolle el siguiente Taller:
TALLER.
Desarrolle un programa donde aplique lo aprendido con 2 COMBOBOX
domingo, 8 de junio de 2014
Undécimo Grado - 2014 - III Periodo - Plan de Gestón
Grado: Undécimo.
Asignatura: Tecnología e Informática
Periodo: III.
Año: 2014.
Componentes:
·
Apropiación y uso de la Informática
·
Solución
de problemas con tecnología
Ejes Curriculares:
·
Programación
de los controles básicos y desarrollo de Software didáctico.
·
Soluciones
a problemas tecnológicos.
Manifiesto destreza en la elaboración de programas
básicos utilizando listas de opciones y manejo de archivos con el lenguaje de
programación Visual Basic 6.0.
Propongo, analizo y comparo diferentes soluciones a
un mismo problema, explicando su origen, ventajas y dificultades.
Núcleos Integradores- Manejo de Unidades de disco, carpetas y archivos.
- ComboBox.
- ListBox.
- Control Timer.
- Menús
Asignatura: Tecnología e Informática.
Formación en Valor: Manejo de Unidades de disco, carpetas y archivos.
Objetivo: Programar la exploración de unidades y carpetas.
Manejo de Unidades de disco, carpetas y archivos.
Visual Basic 6.0 le permite con una serie de objetos explorar las unidades de disco y mostrar los archivos que contengan las unidades de disco o carpetas.
Objetos a Utilizar:
Taller:
Realice el siguiente diseño de formulario con los objetos anteriores:
Nota: al objeto Image debe cambiarle la propiedad Stretch a TRUE, para que se ajuste al tamaño del objeto cuando se muestra la imagen.
Debe copiar el siguiente código:
'La comilla sencilla al frente del código indica que es un comentario.
'Muestra los archivos al cambiar la carpeta.
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
'Al cambiar la unidad de disco muestra que carpetas contiene.
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
'Muestra la imagen al dar un clic sobre el archivo de imagen.
Private Sub File1_Click()
Image1.Picture = LoadPicture(File1.Path + "\" + File1.FileName)
End Sub
'Al momento de mostrar el formulario le indica al objeto FileListBox
' que muestre solo los tipos de archivos jpg, bmp y gif
Private Sub Form_Load()
File1.Pattern = "*.jpg; *.bmp; *.gif"
End Sub
Ejecute el programa presionando la tecla F5 y explore el disco en busca de imágenes.
domingo, 18 de mayo de 2014
CheckBox y OptionButton
11A
Fecha: Mayo 19 de 2014
Fecha: Mayo 19 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor:Amor a la Virgen María.
Núcleo Integrador: CheckBox
Núcleo Integrador: CheckBox
Objetivo: Programar las Casillas de Verificación.
CheckBox:
también conocidas como Casillas de Verificación, nos permite establecer
una lista de opciones, de las cuales podemos seleccionar ninguna, una,
algunas o todas.
Son opcionales.
Estos objetos trabajan con la propiedad Value:
Si tiene el valor de 1 indica que fue seleccionada.
Si tiene el valor de 0 indica que No se ha seleccionado.
Ejemplo:
Adicione un CHECKBOX al formulario.
Cámbiele la propiedad Caption por: “Esta Inactivo “
Doble clic sobre el CheckBox
Escriba el siguiente código sobre el evento Clic
Private Sub Check1_Click()
If Check1.Value = 0 Then
Check1.Caption = "Esta Inactivo"
ElseIf Check1.Value = 1 Then
Check1.Caption = "Esta Activo"
End If
End Sub
Ejecute el programa presionando F5
Taller:
Desarrolle un ejercicio que aplique lo aprendido, de la siguiente forma:
Incorpore
un CheckBox al Formulario que tenga en la propiedad Caption IVA, al
Activarlo que Sume el IVA y que al Desactivarlo lo Reste.
Nota: utilice dos cuadro de texto que tenga el Valor Venta y otro el Valor IVA.
Recuerde que el IVA es el 16% de la Venta.
Para obtener el anterior diseño tenga en cuenta:
a. Los LABEL se les cambia la propiedad CAPTION..
b. Los TEXT se les debe borrar la propiedad TEXT, para que no muestren texto.
c. Los CHECKBOX se les cambia la propiedad CAPTION.
d. Los COMMANDBUTTON se les cambia la propiedad CAPTION.
2. Programar el botón CALCULAR.
a. Doble Clic sobre el botón CALCULAR y escribir el siguiente código:
Private Sub Command1_Click()
If Check1.Value = 1 Then
Text2 = Val(Text1) * 16 / 100
Else
Text2 = 0
End If
Text3 = Val(Text1) + Val(Text2)
End Sub
EJECUTE EL PROGRAMA CON F5
El usuario debe escribir el valor venta.
Si la venta tiene IVA, activar la casilla.
Clic en el botón CALCULAR.
=========================================================================
11A
Fecha: Mayo 19 de 2014
Fecha: Mayo 19 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor:Amor a la Virgen María.
Núcleo Integrador: OptionButton
Núcleo Integrador: OptionButton
Objetivo: Programar los Botones de Opciones.
Son botones de opciones , las cuales se utilizan para trabajar listas de opciones, de las cuales se puede seleccionar una sola opción.
Se controla con la propiedad Value, la cual indica si esta o no seleccionado el OPTIONBUTTON.
Tiene dos posibles valores:
TRUE No esta seleccionado.
FALSE Esta Seleccionado.
DESARROLLE: El siguiente diseño de formulario:
RECUERDE:
Pegue el siguiente código en la ventana de código de Visual Basic:
'Este programa Calcula la Bonificación y el Neto a Pagar de un empleado
'La Bonificación se distribuye así_:
'Si el empleado es Nuevo, la Bonificación es del 10% del salario
'Si el empleado es Antiguo se le da el 15% del salario.
'Neto a Pagar es la Suma del Salario Más la Bonificación.
Private Sub Command1_Click()
If Option1.Value = True Then
Text3 = Val(Text2) * 10 / 100
ElseIf Option2.Value = True Then
Text3 = Val(Text2) * 20 / 100
Else
MsgBox "Debe seleccionar el Tipo de empleado (Nuevo o Antiguo)"
Exit Sub
End If
Text4 = Val(Text2) + Val(Text3)
End Sub
' Este Botón Blanquea los cuadros de texto, los OptionButton y el CheckBox.
' Pasa el cursor al primer cuadro de texto
Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
Option1.Value = False
Option2.Value = False
Text1.SetFocus
End Sub
Suscribirse a:
Entradas (Atom)











