|
Microsoft Visual Basic Script ( VBS) langue permet aux utilisateurs d'ajouter des fonctions supplémentaires à leurs applications Windows . Il vous donne également la possibilité de boucler l'exécution de script VBS lorsque vous devez exécuter un groupe d'instructions VBS à plusieurs reprises . Vous pouvez répéter les instructions jusqu'à ce qu'une condition est vraie ou fausse ou déclarations répétées un certain nombre de fois . Les instructions de boucle dans les scripts VBS vous permettent d'ajouter des options supplémentaires pour les applications Windows. Instructions
1 Cliquez sur "Démarrer " de Windows puis « Éditeur de script Microsoft Visual Basic "
2 Entrez le code suivant dans la fenêtre ouverte : .
< p> Sous CtrlPremierWhile ()
Dim compteur , myNum
compteur = 0
myNum = 20
Do While myNum > 10 & < p> myNum = myNum - 1 x compteur = compteur + 1
boucle
MsgBox
" La boucle a effectué " & compteur & " répétitions. " End Sub
sous DoMyProc50Times ()
Dim x
Pour x = 1 à 50
MyProc
Suivant
< p> MsgBox " La boucle se répète 50 fois. "
End Sub Sub
cmdChange_OnClick
Dim. d 'Créer une variable
Set d = CreateObject ( " Scripting.Dictionary " )
d.Add " 0", " Grèce " ' Ajouter des clés et des articles
d.Add "1", "France"
d.Add "2" , "Espagne"
pour chaque i dans d
Document.frmForm.Elements ( I). Value = D.Item (I)
Suivant
MsgBox " Les répétitions de la boucle » et d & ' temps ».
End Sub
3 Cliquez sur " fichier "puis " Enregistrer " d'appliquer le code script VBS dans votre application.
|
