|
Avoir un compte à rebours électronique sur votre bureau peut être une façon pratique de garder une trace des grands événements. Si vous voulez savoir combien de temps il est jusqu'à ce que le week-end ou jusqu'à ce que le jour de votre mariage, un compte à rebours est votre rappel constant . Vous pouvez faire un compte à rebours électronique en utilisant le logiciel de programmation simple. Et avec un peu de patience , vous serez le décompte des jours, heures, minutes et secondes. Choses que vous devez
Visual Basic
Afficher plus Instructions
1 Commencez votre copie de Visual Basic et créez un nouveau document. Cliquez sur "Nouveau projet ... " dans le menu situé à gauche de votre écran. Sélectionnez "Application Windows Forms " et cliquez sur "OK " pour terminer mis en place.
2 Double -cliquez sur " Button" de la fenêtre " Boîte à outils " . Ceci va insérer un nouveau bouton ( Button1 ) dans votre fenêtre de projet. Avec votre souris , ajuster sa position et le placement si nécessaire.
3 Double -cliquez sur "Timer " de la " boîte à outils ". Ceci va insérer votre commande de la minuterie à l'espace de travail. Ajuster le placement si nécessaire.
4 Double- cliquez sur l'outil "Label" dans la fenêtre " Boîte à outils " . Ceci va insérer une fenêtre d'affichage qui sera utilisé par votre minuterie. Ajustez la position si nécessaire.
5 Double- cliquez sur " Button1 ". Cela va ouvrir son "Form1.vb" module . Recherchez et sélectionnez le champ de saisie " Button1_Click ". Vous saisissez le codage de contrôler d'intervalle et compte à rebours de la minuterie. Réglez-le à intervalles d'une seconde du temps de référence de 15 minutes. Tapez le code suivant :
Timer1.Interval = 1000 Photos Timer1.Start ()
cntDown = Date.Now.AddMinutes (15)
6 Cliquez sur l' onglet nommé " Form1vb [Design] " trouvé près du bas de la fenêtre de contrôle "Timer" . Sous la rubrique « Timer1_Tick ", sélectionnez le champ de saisie. Ajoutez le code qui va vérifier si le compte à rebours est terminé et afficher le temps qu'il a laissé dans l'affichage du compte à rebours que vous avez ajouté à l'étape 4 . Entrez le code suivant :
Si cntDown < Date.Now Puis
Me.Timer1.Stop ()
MessageBox.Show (" ! Rebours a 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 retourner à la fenêtre principale du projet et enregistrez le fichier . Cliquez sur la touche F5 sur votre clavier pour activer le code. Utilisez votre souris pour cliquer sur "Button1 " pour démarrer le compte à rebours .
|
