martes, 28 de mayo de 2019

Registrar Preguntas

Fecha: Mayo 27 de 2019
Asignatura: Tecnología e Informática
Formación en Valor: Honestidad.
Núcleo Integrador: Desarrollo de software didáctico.
Desempeño esperado: Crea software didáctico utilizando Visual Basic.
Exploración Cognitiva
¿Sabes que es un software didáctico ?


El siguiente formulario le permite registrar las preguntas y posibles respuestas en la hoja de calculo, para crear una base de datos de preguntas y respuestas al momento de realizar la evaluación que desee el usuario.


El siguiente código se utiliza en el botón Guardar (CommandButton1_Click()), para reguistar los datos en la hoja de calculo y llenar los datos del formulario antes de ser mostrado (UserForm_Initialize())



Private Sub CommandButton1_Click()
  'BOTÓN GUARDAR
  Dim R As String, F As Integer, _
      Cedula As String, Nombre As String, _
      Direccion As String, Salario As Currency
  
  F = 2
  R = "S"
  Cedula = TextBox1
  Do While R = "S"
    
    If Hoja1.Cells(F, 1) = "" Then
      Hoja1.Cells(F, 1) = F - 1
      Hoja1.Cells(F, 2) = ComboBox2.Text
      Hoja1.Cells(F, 3) = ComboBox1.ListIndex
      Hoja1.Cells(F, 4) = TextBox6
      Hoja1.Cells(F, 5) = TextBox1
      Hoja1.Cells(F, 6) = TextBox2
      Hoja1.Cells(F, 7) = TextBox3
      Hoja1.Cells(F, 8) = TextBox4
      Hoja1.Cells(F, 9) = "FALSO"
      Hoja1.Cells(F, 10) = ComboBox3.ListIndex + 1
      Hoja1.Cells(F, 11) = UCase(TextBox5)
      MsgBox "SE REGISTRARON LOS DATOS"
      Exit Sub
      
    End If
    F = F + 1
  Loop
End Sub

Private Sub UserForm_Initialize()
   'ESTE EVENTO OCURRE CUANDO SE INICIA EL FORMULARIO
  ComboBox1.AddItem "Preescolar"
  ComboBox1.AddItem "Primero"
  ComboBox1.AddItem "Segundo"
  ComboBox1.AddItem "Tercero"
  ComboBox1.AddItem "Cuarto"
  ComboBox1.AddItem "Quinto"
  ComboBox1.AddItem "Sexto"
  ComboBox1.AddItem "Septimo"
  ComboBox1.AddItem "Octavo"
  ComboBox1.AddItem "Noveno"
  ComboBox1.AddItem "Decimo"
  ComboBox1.AddItem "Undecimo"
  
  ComboBox2.AddItem "Informatica"
  ComboBox2.AddItem "Matematicas"
  ComboBox2.AddItem "Lenguaje"
  ComboBox2.AddItem "Quimica"
  
  ComboBox3.AddItem "Pregunta 1"
  ComboBox3.AddItem "Pregunta 2"
  ComboBox3.AddItem "Pregunta 3"
  ComboBox3.AddItem "Pregunta 4"
  
End Sub




lunes, 20 de mayo de 2019

Desarrollo de software didáctico.


Fecha: Mayo 20 de 2019
Asignatura: Tecnología e Informática
Formación en Valor: Honestidad.
Núcleo Integrador: Desarrollo de software didáctico.
Desempeño esperado: Crea software didáctico utilizando Visual Basic.
Exploración Cognitiva
¿Sabes que es un software didáctico ?


NRO
ASIGNATURA
GRADO
PREGUNTAS
RESPUESTA1
RESPUESTA2
RESPUESTA3
RESPUESTA4
ESTADO
RESPUESTA
IMAGEN
1
MATEMATICAS
7





VERDADERO
4
NO
2
LENGUAJE
8





FALSO
2
IMAGEN2.JPG
Desarrolle un software didáctico que permita realizar evaluaciones Saber 11, tipo ICFES.
Realice el ejercicio con dos cursos y dos asignaturas.

El programa debe preguntar el grado, mostrar las asignaturas a evaluar de ese grado y con esa información, mostrar las preguntas del grado en esa asignatura.

TENGA EN CUENTA:
 * Cada pregunta debe tener 4 posibles respuestas (PREGUNTA1, PREGUNTA2, ...). 
 * En la hoja se controla cual es la respuesta correcta (columna RESPUESTA).
 * ESTADO: muestra VERDADERO si la pregunta no se ha realizado, FALSO cuando ya se realizo la pregunta.
 * IMAGEN: Si en la columna aparece NO, es porque no tiene imagen esa pregunta, si aparece un nombre se debe buscar ese nombre en la carpeta donde esta el programa y mostrarlo.