|
Avoir les connaissances nécessaires pour construire un minuteur électronique à l'aide du code dans Windows peut vous faire gagner du temps . Une minuterie électronique peut être construit en utilisant Microsoft Visual Basic.NET ( VB.NET ) - un langage de programmation informatique orienté objet . Une minuterie électronique peut être utilisé dans une application Windows à décompter et d'exécuter d'autres processus lorsque la minuterie s'arrête comptage. En quelques étapes , vous allez créer un compte à rebours à l'aide d'un contrôle Timer et une étiquette pour afficher l'heure . Choses que vous devez
Microsoft Visual Basic Express
Voir Plus Instructions
1 Démarrez Microsoft Visual Basic Express, puis cliquez sur "Nouveau projet ... " Dans le volet gauche de votre écran . Sélectionnez " Application Windows Forms . " Cliquez sur « OK ».
2 Double- cliquez sur "Button " sur le volet «boîte à outils » pour ajouter un nouveau bouton de commande . Double -cliquez sur " Timer" pour ajouter un contrôle de la minuterie. Le chronomètre sera utilisé pour décompter .
3 Double -cliquez sur " label " pour ajouter une étiquette. L' étiquette sera utilisée pour afficher le temps que ça baisse. Double -cliquez sur " Button1 " pour ouvrir le "Form1.vb" module .
4 Tapez la commande suivante dans " Button1_Click " pour définir l'intervalle de minuterie à 1 seconde , démarrer le chronomètre , et commencer le compte à rebours de 15 minutes à partir de maintenant .
Timer1.Interval = 1000 Photos Timer1.Start ()
cntDown = Date.Now.AddMinutes (15)
5 Cliquez sur le " Form1.vb [Design] " onglet et doube -cliquez sur la touche "Timer " en bas de votre écran.
6 Tapez la commande suivante sous la rubrique « Timer1_Tick " pour vérifier si le compte à rebours est terminé. Si elle n'a pas, puis continuer à obtenir la différence entre l'heure courante et la variable " cntDown " . Afficher la différence dans le contrôle Label.
Si cntDown < Date.Now Puis
Me.Timer1.Stop ()
MessageBox.Show (" compte à rebours est terminé ! »)
Else
timeRem As TimeSpan = Me.cntDown.Subtract ( Date.Now )
Me.Label1.Text = String.Format ( " {0} : { 1: d2 } : { 2 : d2 } ", _
timeRem.Hours , _
timeRem.Minutes , _
timeRem.Seconds )
End If
7 Appuyez sur " F5" pour exécuter le programme , puis cliquez sur "Button1 " pour démarrer le compte à rebours .
|
