|
. Dans Visual Basic NET, le contrôle Timer vous permet de contrôler les événements récurrents pendant l'exécution de votre application. Programmateur a quelques propriétés et les méthodes qui lui sont propres . Sa propriété la plus importante est l'intervalle qui spécifie la fréquence de la minuterie doit exécuter son code. Vous fournissez une valeur d'intervalle en millisecondes ; 1000 millisecondes est égal à une seconde. Quelques exemples de ce que vous pouvez faire avec un contrôle Timer , se produisant notamment un compte à rebours , en changeant dynamiquement des valeurs de propriété pour d'autres contrôles et de maintenir une veille constante sur une autre partie de l'application. Instructions
1 Ouvrez un projet Visual Basic. Double-cliquez sur le contrôle Timer pour ajouter Minuteur1 au projet. Double- cliquez sur le contrôle Label pour ajouter Label1 au formulaire. Changement a permis la propriété du contrôle Timer1 à True et la propriété Interval à 1000
2 presse "F7 " pour ouvrir la fenêtre de code , et tapez le code suivant : .
Temps As integer = 10 & Cela crée une variable et initialise
3 Ouvrez la sous-routine Timer1_Tick et tapez le code suivant : .
Si le temps > 0 Then
temps = temps - 1 x Label1.Text = temps
Else
Timer1.Enabled = False End If
Photos Lorsque le programme s'exécute , la temporisation diminuer la variable temps par un chaque seconde, et afficher la valeur sur l'étiquette, jusqu'à ce que le compte à rebours atteint 0 , à quel point la minuterie s'éteint.
< br > 4 Appuyez sur "Shift" et "F7" pour ouvrir la fenêtre de conception. Double-cliquez sur le contrôle Timer pour ajouter Timer2 au projet. Changer sa propriété Enabled la valeur true et sa propriété Interval à 100, puis double- cliquez dessus pour ouvrir la sous-routine Timer2_Tick . Tapez le code suivant :
( Label1.Left + Label1.Width ) > Me.Width Puis
Label1.Left = Me.Left - 100
End If Photos Label1.Left = Label1.Left + 5
Ce code provoque l'étiquette pour faire défiler horizontalement sur l'écran , le déplacement de cinq pixels chaque dixième de seconde . Lorsque l'étiquette atteint l'extrémité droite de la forme, il revient à la gauche et commence à défiler à travers nouveau.
5 Appuyez sur " Shift" et " F7" pour ouvrir la fenêtre de conception. Double-cliquez sur le contrôle Timer pour ajouter Minuteur3 au projet. Changer sa propriété Enabled la valeur true et la propriété Interval à 500. Double-cliquez sur le contrôle zone de texte à ajouter TextBox1 au projet. Double -cliquez sur Minuteur3 sur le projet d'ouvrir le sous-programme Timer3_Tick . Tapez le code suivant :
TextBox1.Text = TextBox1.Text.ToUpper
TextBox1.Select ( TextBox1.TextLength , 0)
Chaque demi-seconde de la minuterie change tout le texte dans TextBox1 en majuscules. Par défaut, lorsque la minuterie fait ce changement, il déplace le curseur au début de la zone de texte . La deuxième ligne de code empêche que cela se produise .
|
