|
Le contrôle de barre de progression Visual Basic 2008 illustre visuellement la progression de certaines opérations dans un programme. Lors de la création du programme , vous définissez le "minimum" et "maximum" propriétés de la barre de progression , et alors que le programme exécute une action sur les données , vous mettez à jour l'état de la barre de progression en modifiant sa propriété "value" . Par exemple, si votre programme ouvre un fichier et lit 50 lignes de texte dans un tableau de chaînes , régler le minimum de la barre de progression à zéro et le maximum de 50. Lorsque le programme lit les 25 premières lignes , changez la valeur de la barre de progression à 25 pour montrer le marqueur de progrès à mi-parcours . Instructions
1 Ouvrez un projet Visual Basic 2008 en mode Création . Double-cliquez sur la commande " ProgressBar " pour l'ajouter au formulaire. Double- cliquez sur le contrôle " Bouton" afin de l'ajouter à la forme aussi bien. Disposez les contrôles sur le formulaire que vous souhaitez les voir apparaître .
2 Ouvrez la fenêtre de code . Tapez " Imports System.IO " sur la première ligne pour faire de votre programme appeler l'entrée du système et les fonctions de sortie . Vous en aurez besoin pour ouvrir et lire un fichier.
3 ouvrir la fonction " Button1_Click " . Tapez la commande suivante :
compte As Integer = 0
entrée As StreamReader = New StreamReader ( "c: \\ fichier.txt " )
lignes sombres ( 1000) As String
totale As Integer
La première déclaration déclare une variable compteur simple. Le second ouvre un objet StreamReader qui lit un fichier texte appelé " filename.txt . " La troisième déclaration crée un tableau de chaînes pouvant contenir jusqu'à 1000 lignes du fichier de texte. La dernière déclaration crée une variable entière que vous allez utiliser pour mettre à jour la barre de progression
4 Tapez la commande suivante : .
While Not input.EndOfStream lignes
( count) = input.ReadLine ()
nombre de + = 1
End While
Cette boucle lit le fichier texte et les magasins et les magasins de chaque ligne dans un endroit dans le tableau jusqu'à ce que chaque ligne a été lu
5 Tapez la commande suivante : .
progrès = comte de ProgressBar1.Minimum = 0
ProgressBar1.Maximum = progrès
Ceci définit la variable « progrès» à la valeur que la variable "count " , puis définit la valeur minimale de la barre de progression à zéro et le maximum de la valeur que le «progrès» est titulaire .
6 Tapez la commande suivante :
For i = 0 To progrès - 1 x callToSomeFunction (array )
progrès - = 1
ProgressBar1.Value = i
Next i
cycles Cette boucle à travers chaque élément du tableau et effectue une action sur elle dans la " callToSomeFunction (array ) " en ligne. Comme chaque élément du tableau est traitée, la variable « progrès» est diminué par un et la valeur de la barre de progression est modifiée pour refléter l'état de la boucle.
|
