Prueba de codificación de una aplicación que simula un temporizador de cuenta atrás . El usuario introduce el número de segundos que el programa es establecer un temporizador de; . El programa hace la cuenta atrás, mostrando el número de segundos restantes y una alerta visual al final de la cuenta regresiva
Para iniciar este proyecto , abrir el IDE de Visual Basic ( entorno de desarrollo integrado). Seleccione " Archivo" > "Nuevo "> " aplicación de Windows Forms . " En la ventana Diseñador de formularios , arrastre los controles siguientes al formulario desde el cuadro de herramientas . Primero arrastrar un cuadro de texto para que el usuario introduzca el número de segundos que la cuenta atrás . En ese cuadro de texto a cabo otra para el programa que muestra los segundos restantes . Por debajo de ese segundo cuadro de texto , coloque un botón para el usuario para iniciar el temporizador . También , arrastre y suelte un control timer en el formulario. El usuario no verá este control , pero su código hará.
Cambie la propiedad Text del botón de " Inicio". Asegúrese de que el caso de cada letra coincide con " Inicio". Puede acceder a la ventana Propiedades de "Ver" > " Propiedades. "
Escribir el programa
Ahora que ha configurado el formulario, escribir el código que utiliza la forma de comunicarse con el usuario . Haga doble clic en el botón. La ventana de código aparece, con el cursor dentro de la función en blanco Button1_Click . Esta función se llama cuando el usuario pulsa el botón del formulario.
La primera parte del código se establece el intervalo del temporizador en milisegundos y se inicia el temporizador estableciendo su propiedad "Enabled " . Estas acciones suceden sólo si el texto del botón lee " Inicio".
Private Sub Button1_Click (... [argumentos omitidos para mayor claridad ] ) Si ( Button1.Text = " Start" ) ThennSecsLeft = CInt ( TextBox1.Text ) Button1.Text = Timer1.Interval "Stop" = 1000Timer1.Enabled = TrueElseButton1.Text = " Inicio" Timer1.Enabled = False
End Sub IfEnd
la última parte del código, de otro , Trata el caso cuando el temporizador ya se está ejecutando . El programa se desactiva el temporizador a través de su propiedad " Enabled" y cambia el texto del botón para que se reinicie el programa.
Evento
del temporizador Cada segundo ( 1000 milisegundos ) que pasa hace que la función Timer1_Tick para ejecutar . Su aplicación tiene que hacer varias cosas en esa función : avisar al usuario de cuántos segundos quedan en la cuenta regresiva y detectar el final de la cuenta atrás, y cuando termine la cuenta atrás, se apaga el temporizador y alertar al usuario. El siguiente código completa estas tareas.
Private Sub Timer1_Tick (... )
TextBox2.Text = nSecsLeftIf ( nSecsLeft = 0 ) = ThenTimer1.Enabled FalseMsgBox ( "Done !")
Button1.Text = " Inicio" ElsenSecsLeft = nSecsLeft - 1
End If End Sub
Ejecutar el programa terminado . A continuación, experimentar con él . Por ejemplo , escribir código que no otra cosa , además de mostrar un cuadro de mensaje .