Encuentre a alguien que realice un procedimiento de lotería.

Pregunta: En una clase abierta, vi que el maestro usaba un programa de lotería de Excel en la clase y los estudiantes que obtuvieron el número de estudiante correspondiente respondieron las preguntas. Esto puede aumentar el ambiente en el aula y movilizar a los estudiantes para que participen activamente. Esta es una gran estrategia de enseñanza. Respuesta: La idea del profesor es muy creativa y no es difícil de realizar. De hecho, las loterías son muy comunes en nuestra vida diaria. Aquí presentamos un ejemplo de un programa de lotería simple, con la esperanza de brindarle más inspiración. Supongamos que hay 25 números y cada línea tiene 5***5 filas. Dibuja dos botones de comando debajo del número y cambia sus propiedades de título a "Dibujar" y "Pausar" respectivamente. Haga doble clic en el botón "Lotería" para ingresar el código. El código clave es el siguiente:

k=0:flag=0

Hacer hasta flag=1

Para i=6 a 10

Para j=3 a 7

Si k=0, entonces

Celda (I, j). Seleccione

"DoEvents" para liberar el control del programa y permitir que se ejecuten otros eventos.

k=1

Celda (I,j). Elegir

Terminará si...

Entonces

realiza un bucle para cerrar la ventana de código y volver al dibujo. Haga clic en el botón "Pintar" para seleccionar rápidamente 25 celdas en secuencia y haga clic en el botón "Pausar" para interrumpir la ejecución del programa de dibujo (es decir, seleccione uno de los números). Haga clic en el botón "Dibujar" nuevamente para continuar sorteando y se completará un proceso de sorteo simple. Presione Alt y F11 para ingresar a la interfaz de macro, haga clic en el menú Insertar y pegue el siguiente código:

Indicador booleano Dim

Nivel aaa secundario ()

Inserte la celda A medida que el rango se atenúa

hágalo hasta la marca

rango(" C6:G10 "). celda(Int(Rnd() * 25) + 1). Seleccione

Múltiples actividades

Anillo

flag=false

Conector final

sub bbb()

Flag=True

Conector final

Vuelva a Excel, ingrese 25 etiquetas: G10 (las palabras en negrita en el código se modifican según la situación real), inserte dos gráficos, como cuadros, uno con "dibujar" y otro con "pausa", haga clic derecho en el primer cuadro y especifique la macro, aaa, haga clic derecho en el segundo cuadro y especifique la macro bbb.

Simplemente hazlo.

上篇: Introducción al rol del guerrero de Crystal Code 下篇: Colas de primavera que describen el Año del Tigre