Microsoft Basic Script (VBS) langage Visual permet aux utilisateurs d`ajouter des fonctions supplémentaires à leurs applications de fenêtres. Il vous donne également la possibilité de boucler l`exécution de scripts VBS quand vous avez besoin d`exécuter un groupe d`instructions VBS à plusieurs reprises. Vous pouvez répéter les instructions jusqu`à ce qu`une condition est des déclarations vraies ou fausses ou répétées un certain nombre de fois. Les instructions de boucle dans les scripts VBS vous aident à ajouter des options supplémentaires pour les applications Windows.
Cliquez sur "Démarrer" dans Windows suivi de "Microsoft Visual Basic Script Editor".
Entrez le code suivant dans la fenêtre ouverte:
Sous CtrlPremierWhile ()
Dim compteur, myNum
compteur = 0
myNum = 20
Do While myNum> 10
myNum = myNum - 1compteur = compteur + 1
Boucle
MsgBox "La boucle fait ` compteur «répétitions».
End Sub
DoMyProc50Times Sous ()
Dim x
Pour x = 1 à 50
MyProcProchain
MsgBox "La boucle se répète 50 fois."
End Sub
Sous cmdChange_onclick
Dim d `Créer une variable
Set d = CreateObject ( "Scripting.Dictionary")
d.Add "0", "Grèce" `Ajouter des clés et des éléments
d.Add "1", "France"
d.Add "2", "Espagne"
Pour chaque I d
Document.frmForm.Elements (I) .Value = D.Item (I)Prochain
MsgBox "La boucle répète ` ré «temps».
End Sub
Cliquez sur "Fichier" puis "Enregistrer" pour appliquer le script VBS de code dans votre application.
