Código fuente del sistema de navegación del mini programa
{
Versión 2
Biblioteca de soporte shellEx
. Biblioteca de soporte eAPI
. Conjunto ventana conjunto 1
. Identificador de tecla de acceso rápido variable de ensamblaje, número entero.
. Recuento de variables de ensamblaje, tipo entero
. Subrutina_ _Iniciar ventana_Creada
Identificador de tecla de acceso directo = tecla de acceso rápido registrada (obtener identificador de ventana (), etiqueta 1. Obtener identificador de ventana (), 0, tecla #F10).
Subrutina_Reloj 1_Evento Periódico
. Número de variable local, tipo de texto
. Variable local b grado, tipo entero.
Contar=contar+1
Teclas analógicas (tecla #A, tecla #2 y tecla #espacio)
. Encabezado del bucle de conteo (obtener la longitud del texto (al texto (contar)), contar b)
Número = obtener la mitad del texto (al texto (contar), contar B, 1)
Si es verdadero (número = "0")
Simular clave (# clave 0,,)
Si es verdadero.
Si es verdadero (número = "1")
Simular clave (# clave 1,,)
Si es verdadero.
Si es verdadero (número = "2")
Simular clave (# clave 2,,)
Si es verdadero.
Si es verdadero (número = "3")
Simular clave (# clave 3,,)
Si es verdadero.
Si es verdadero (número = "4")
Simular clave (tecla # 4,,)
Si es verdadero.
Si es verdadero (número = "5")
Simular clave (# clave 5,,)
Si es verdadero.
Si es verdadero (número = "6")
Simular clave (# clave 6,,)
Si es verdadero.
Si es verdadero (número = "7")
Simular clave (# clave 7,,)
Si es verdadero.
Si es verdadero (número = "8")
Simular clave (# clave 8,,)
Si es verdadero.
Si es verdadero (número = "9")
Simular clave (# clave 9,,)
Si es verdadero.
. Cola del ciclo de conteo ()
Tecla analógica (tecla #Intro,,)
Título = a texto (recuento)
. Si es verdadero (recuento = 10)
_ Etiqueta 1_Evento de retroalimentación (0, 0)
Si es verdadero.
. Subrutina _ Etiqueta 1_Evento de retroalimentación, tipo entero
Parámetro parámetro 1, tipo entero
Parámetro parámetro 2, tipo entero
. If(clock1.clockperiod=0)
reloj1. período de reloj = 1000.
Etiqueta 1. Título = "Abierto"
En caso contrario.
Reloj 1. período de reloj = 0.
Etiqueta 1. Title="Close"
Title="Close"
Si finaliza
La subrutina _ _Ventana de inicio_ será destruida.
Deshacer tecla de acceso rápido (obtener identificador de ventana (), identificador de tecla de acceso rápido)
}Fin
Solo hay dos controles, un reloj y una etiqueta.
Si desea probar la estabilidad sin otras configuraciones, puede activar el período de reloj en el código del cuaderno y configurarlo en =1.
Rápido, fuerte estabilidad y código simple.
Si tienes alguna otra pregunta, por favor pregunta a Baidu hola.
-
Por cierto, si quieres controlar el número de veces, agrega un código. a la subrutina del ciclo de reloj.
Código complementario{
Si es verdadero (recuento = 100000), este 100000 es el número de veces que limitas.
_ Etiqueta 1_Evento de retroalimentación (0, 0)
}