Plan de Gestión III Periodo

11 Grado - III Periodo  Tecnología e Informática
Componente	Apropiación y uso de la tecnología.
Ejes Curriculares	Programación de los controles básicos Y desarrollo de Software didáctico.
Estándares de Desempeño	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.
Núcleos Integradores III Periodo
·                     Manejo de Unidades de disco, carpetas y archivos. ·                     ComboBox. ·                     ListBox. ·                     Control Timer. ·                     Menús.

=================================================================

Núcleo: CheckBox y OptionButton

Fecha: Julio 15 de 2013

Asignatura: Tecnología e Informática.

Formación en Valor: Lealtad.

Núcleo Integrador: CheckBox y OptionButton

Objetivo: Programar las Casillas de Verificación y los Botones de Opciones.

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.

Se controla con la propiedad Value, la cual indica si esta o no seleccionado el CHECKBOX.
Tiene dos posibles valores:
0 No esta seleccionado.
1 Esta Seleccionado.

Los OptionButton

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

'Si Tiene Bonificación y es Nuevo se les da el 10% del salario.

'Si Tiene Bonificación, y es Antiguo se les da el 15% del salario.

'Si Bonificación NO esta Activo, NO tiene Bonificación, es cero

Private Sub Command1_Click()

  If Check1.Value = 1 Then

    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)"

    End If

  ElseIf Check1.Value = 0 Then

    Text3 = 0

  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

  Check1.Value = 0

  Text1.SetFocus

End Sub

TALLER:
Desarrolle un programa utilizando Botones de Opciones y Casillas de Verificación. Tenga en cuenta el ejemplo Anterior.