|
Le contrôle Timer dans Visual Basic est un dispositif très utile qui envoie une impulsion à une application à des intervalles prédéterminés. Le contrôle peut afficher des mises à jour de la durée d'une installation prend en comptant à rebours , de surveiller ce qu'un utilisateur est en train de faire ou d'exécuter d'autres routines , tout un programme principal est en marche. Si Visual Basic Express, qui est un programme NET, est impliqué certains des mots de code sera différent . Choses que vous devez
Visual Basic
Voir Plus Instructions
1 Ouvert Basic et sélectionnez «Nouveau projet» un visuel " EXE standard. " Cliquez sur "Fichier " puis "Enregistrer formulaire1 que " et lui donner un nom comme " timerproject . " Puis cliquez sur " Enregistrer le projet sous " et nommez-le "Project Timer ». Visual Basic applique les extensions de fichier corrects par défaut.
2 changer le " Caption" propriété dans le panneau Propriétés en bas à droite de « contrôle Timer ».
3 placer un contrôle Timer sur la forme en double- cliquant sur la touche "Timer " , qui apparaît comme une icône de l'horloge , dans la boîte à outils dans le panneau de gauche . La commande ne sera pas visible lorsque le programme s'exécute . Pour plus de clarté , cliquez et faites-la glisser vers un coin plus bas du formulaire.
4 mettre une étiquette sur la forme en double- cliquant sur le contrôle "Label" , représentée par une grande lettre "A" dans la boîte à outils . Cliquez sur le " label " maintenant sur la forme , puis dans le panneau Propriétés changer le nom de l'étiquette de "Clock " et supprimer les lettres dans la ligne de légende. Répétez cette opération pour une deuxième étiquette et nommez-le " voeux ". Modifier la largeur pour les deux labels à 2000.
5 Cliquez sur Affichage > Code au top pour ouvrir une fenêtre de code. Ecrire le code pour un événement de minuterie . Ceci est juste un exemple , pour contrôler la minuterie désirée utilise vous devez modifier le code pour faire ce que vous voulez qu'il fasse : Private Sub Form_Load ( ) Timer1.Interval = numéros 5000 'représentent millisecondes et 5000 équivaut à une fois toutes les 5 secondes , le changement cela veut periodCall Timer1_TimerEnd SubPrivate Sous Timer1_Timer () Dim strGreeting1 , strGreeting2 , strTime Comme StringstrTime = Temps $ Clock.Caption = Temps strGreeting $ = " Bonjour le monde!" Si Mid $ ( strTime , 7, 1) = ThenGreeting "1". caption = strGreetingElse : . Greeting.Caption = " " End Sub IfEnd
6 test le codage en appuyant sur la touche "F5 " Le temps actuel devrait afficher et mettre à jour toutes les 5 secondes . Lorsque le premier chiffre de l'affichage des secondes se situe entre 10 et 19, les mots " Bonjour! " s'affiche et puis disparaître pendant 50 secondes . Si aucun de ces événements se produit, vérifier le code dans la cinquième étape pour la précision.
7 en faire un programme définitif en cliquant sur Fichier> Faire Project.exe.Run de la minuterie le programme à partir de là où vous sauvegardé .
|
