Fenetre personalisable en VBS
Fermé
quent
-
23 sept. 2014 à 20:01
cs_Le Pivert Messages postés 7883 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 18 mars 2023 - 14 oct. 2014 à 10:57
cs_Le Pivert Messages postés 7883 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 18 mars 2023 - 14 oct. 2014 à 10:57
A voir également:
- Fenetre personalisable en VBS
- Fenêtre dos - Forum Windows
- Vbs pause ✓ - Forum VB / VBA
- Gestionnaire de fenetre du bureau ✓ - Forum Windows 10
- Déplacer fenetre avec clavier ✓ - Forum Windows
- Fenetre qui s'ouvre sur le mauvais écran ✓ - Forum Windows
4 réponses
cs_Le Pivert
Messages postés
7883
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 mars 2023
724
14 oct. 2014 à 09:27
14 oct. 2014 à 09:27
Bonjour,
Je te propose une série de choix (quiz) pour comprendre le fonctionnement de vbs:
Ouvrir un éditeur de texte et mettre ce code:
Tu l'enregistres. Ensuite tu affiches les extensions de fichier. Tu changes txt en vbs.
Faire un UserForm comme en vba n'est possible que par code. Avec cet exemple tu comprendras mieux!
Voilà
Je te propose une série de choix (quiz) pour comprendre le fonctionnement de vbs:
Ouvrir un éditeur de texte et mettre ce code:
Dim Titre, Choix, vbCrlf, Tache, ChoixMsg
Titre = "Essai"
vbCrlf = Chr(13)
Tache = Split("test1,test2,Quitter,",",")
Do
Choix = Inputbox("Entrez le numéro de la tâche que vous désirez effectuer :" & vbCrlf & vbCrlf & "1) test1" & vbCrlf & "2) test2" & vbCrlf & "0) Quitter", Titre, "0")
If Choix <> 0 Then
On Error Resume Next
Select Case Choix
Case 1: MsgBox "Ceci est le test1"
Case 2 : MsgBox "Ceci est le test2"
End Select
On Error Goto 0
End If
If Choix = 0 Then
ChoixMsg = MsgBox("Souhaitez-vous quittez l'application ?", vbYesNoCancel, Titre)
If ChoixMsg = vbYes Then WScript.quit
End If
Loop
Tu l'enregistres. Ensuite tu affiches les extensions de fichier. Tu changes txt en vbs.
Faire un UserForm comme en vba n'est possible que par code. Avec cet exemple tu comprendras mieux!
Voilà
cs_Le Pivert
Messages postés
7883
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 mars 2023
724
14 oct. 2014 à 09:33
14 oct. 2014 à 09:33
Tu peux t'inspirer de ce membre qui est spécialiste vbscript:
https://codes-sources.commentcamarche.net/profile/user/Hackoo
https://codes-sources.commentcamarche.net/profile/user/Hackoo
cs_Le Pivert
Messages postés
7883
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 mars 2023
724
14 oct. 2014 à 10:57
14 oct. 2014 à 10:57
Voir ceci également:
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#exemples_vbs
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#exemples_vbs