El control Timer en Visual Basic es un dispositivo muy útil que envía un pulso a una aplicación a intervalos predeterminados. El control puede mostrar cambios de la duración de la instalación se está contando hacia abajo, controlar lo que un usuario está haciendo o ejecutar otras rutinas , mientras que un programa principal se ejecuta . Si Visual Basic Express , que es un programa de la red , se trata de algunas de las palabras de código será diferente . Cosas que necesitará
Visual Basic
Ver Más instrucciones
1
abierto un proyecto de Visual Basic y seleccione como " Nuevo proyecto ", " EXE estándar . " Haga clic en " Archivo" y "Guardar como form1 " y darle un nombre como " timerproject . " A continuación, haga clic en " Guardar proyecto como" y el nombre " Proyecto Timer ". Visual Basic aplica las extensiones de archivo correctas por defecto.
2
Cambiar la propiedad " Leyenda " en el panel Propiedades en la parte inferior derecha de "Control Timer . "
3
Coloque un control Timer en el formulario , haga doble clic en el control " Timer" , que aparece como un icono de reloj , en la caja de herramientas en el panel izquierdo . El control no será visible cuando el programa se ejecuta . Para mayor claridad, haga clic y arrastre a una esquina inferior del formulario.
4
Ponga una etiqueta en el formulario , haga doble clic en el control " Label " , representada por una gran letra "A" en la caja de herramientas . Haga clic en la "Etiqueta" ahora en la forma y, a continuación , en el panel Propiedades de cambiar el nombre de la etiqueta de "Reloj" y borrar las letras en la línea de título. Repita este procedimiento para una segunda etiqueta y el nombre " Saludo ". Cambiar el ancho de las dos etiquetas para 2000 .
5
Haga clic en Ver > Código en la parte superior para abrir una ventana de código . Escribe el código de un evento de temporizador . Esto es sólo un ejemplo, para controlar el temporizador deseado utiliza tiene que modificar el código para hacer lo que usted quiere que haga : Private Sub Form_Load () Timer1.Interval = números 5000 ' representan milisegundos para 5000 es igual a una vez cada 5 segundos , el cambio esto desea periodCall Timer1_TimerEnd SubPrivate Sub Timer1_Timer () Dim strGreeting1 , strGreeting2 , strTime Como StringstrTime = Tiempo $ Clock.Caption = Tiempo $ strGreeting = " ¡Hola ! " Si MID $ ( strTime , 7 , 1 ) = ThenGreeting " 1 " . Caption = strGreetingElse : . Greeting.Caption = "" End Sub IfEnd
6
Pruebe la codificación con la tecla " F5 " La hora actual debe mostrar y actualizar cada 5 segundos. Cuando el primer dígito de la pantalla segundos cae entre 10 y 19 , las palabras " ¡Hola !" mostrará y luego desaparecen durante 50 segundos . Si ninguno de estos eventos ocurre , compruebe el código en el Paso Cinco de precisión.
7
convertir esto en un programa final , haga clic en Archivo> Crear Project.exe.Run temporizador el programa desde donde se guardado .