Cómo crear preguntas de opción múltiple usando VBA en PowerPoint
2. Haga clic en el comando "Insertar" - "Cuadro de texto" - "Horizontal". En este momento, el mouse cambia a la fuente "1". Haga clic con el botón izquierdo del mouse en el área de edición. el mouse para sacarlo. Un cuadro, ingrese el título de la primera pregunta "1. Cuanto mayor sea el radio orbital del satélite terrestre artificial, entonces" en el cuadro.
3. Hagamos opciones. Haga clic en el comando "Ver"-"Barra de herramientas"-"Caja de herramientas de control" para que aparezca la "Caja de herramientas de control". Haga clic en el control "Botón de opción" en la "Caja de herramientas de control", gire el mouse en forma de cruz, presione el botón izquierdo del mouse y arrastre el mouse para abrir un cuadro. Haga clic en el comando "Propiedades" en la "Caja de herramientas de control" para abrir el cuadro de diálogo "Propiedades" y cambiar "Nombre" a "ti1". Cambie "Nombre" a "ti1", cambie "Título" a "A. Cuanto menor sea la velocidad, menor será el período" y establezca las otras configuraciones por defecto.
Figura 2
Las tres opciones restantes se denominan "ti2", "ti3" y "ti4" respectivamente. Los títulos son "B. Cuanto menor es la velocidad, mayor es el período", "C. Cuanto mayor es la velocidad, menor es el período", "D. Cuanto mayor es la velocidad, mayor es el período", "D. Cuanto mayor es Cuanto mayor sea la velocidad, mayor será el período".
4. Cree el botón "Siguiente pregunta". Haga clic en el control "Botón de comando" en la "Caja de herramientas de control". En este momento, el mouse adquiere forma de cruz. y arrastre un cuadrado en el área de edición como antes, suelte el mouse y el cuadro se convertirá en un botón. Selecciónelo, haga clic con el botón derecho del mouse, seleccione el comando "Propiedades" en el menú emergente de acceso directo. establezca el "Título" en la propiedad "Botón de comando" en "Siguiente". Pregunta".
De esta manera, se completa la interfaz para la primera pregunta. Para la segunda pregunta, podemos seguir los pasos 2. -4. Solo necesitamos cambiar el título y los valores de las opciones, y también necesitamos agregar un comando de cuadro de texto, su nombre se establece en "Suma" y el nombre del botón de comando se cambia a "Puntuación"
3. Agregar código
1. Haga clic en "Caja de herramientas de control". El control "Ver código" abre el editor "Microsoft Visual Basic", haga clic en el comando "Insertar" - "Módulo". Aparece la ventana de edición "Módulo", en la ventana de edición "Módulo", ingrese " public fen(2) como entero ".Value = True Entonces
fen(0) = 2
Else
fen(0) = 0
Finalizar si
Con SlideShowWindows(1).View
.GotoSlide (2)
Terminar con
3. Seleccione el botón "Puntuación" en la última pregunta y haga clic en el control "Ver código" en la "Caja de herramientas de control". "Control, abre el editor "Microsoft Visual Basic", en "Private Sub CommandButton1_Click()" y "End Sub"
Si ti3.Value = True Then
fen(1 ) = 2
Else
fen(1) = 0
Finalizar si
Atenuar i, s<
s = 0
Para i = 0 a 2
s = s + fen(i)
Siguiente
suma = s
Muy bien, sal del editor "Microsoft Visual Basic" y presiona F5. Pruébalo.
¿Es igual al diseño original?
Suma = s