Comment ouvrir une application Windows utilisant Visual Basic

December 12

Comment ouvrir une application Windows utilisant Visual Basic


À un certain point, vous trouverez peut-être bénéfique pour exécuter une application Windows sous Visual Basic. Par exemple, vous devrez peut-être d'ouvrir et de travailler avec une autre application pendant une application Visual Basic exécute. Les capacités multitâches de Windows permettent que cela se produise. Une commande Visual Basic seule accomplit la tâche aussi longtemps que vous savez où sur l'ordinateur pour trouver le fichier exécutable qui ouvre l'application requise. Compte tenu de cette connaissance et quelques lignes de code, la commande "Shell" dans Visual Basic fait le reste.

Instructions

1 Créer un nouveau programme Visual Basic en cliquant sur le modèle "EXE standard" lorsque Visual Basic ouvre. Ceci permet d'obtenir une forme de base pour un exemple d'ouverture d'applications avec la commande "Shell". Cliquez sur "Fichier" et "Projet Enregistrer sous", entrez un nom de formulaire et nom du projet tel que demandé dans les petites fenêtres ouvrantes. Pour cet exemple, utilisez "OpenWindowsApp" comme le nom de la forme et "Open App Windows" comme le nom du projet. Visual Basic joindra les suffixes par défaut, ".frm" à la forme et ".vbp" pour le nom du projet.

2 Ajoutez un "OptionButton" à la forme en double-cliquant sur ce contrôle dans le panneau "Boîte à outils" à gauche de l'écran. L'icône de ce bouton dans la boîte à outils se compose d'un petit cercle avec un point au centre. Cliquez sur ce contrôle sur le formulaire pour afficher les propriétés dans le panneau droit. Double-cliquez sur la propriété "Légende" dans la liste pour mettre en évidence le nom par défaut. Changez cette «Bloc-notes."

3 Répétez l'étape 2 pour ajouter deux autres OptionButtons à la forme, en changeant la propriété de légende pour la seconde à "Internet Explorer" et le troisième "Invite de commandes."

4 Double-cliquez sur l'icône "CommandButton", un petit rectangle dans un carré plus grand dans la boîte à outils, pour ajouter ceci à la forme. Modifiez la propriété de la légende de ce bouton pour lire "Ouvrir l'application." Ajouter une deuxième commande au formulaire de la même manière, mais faire de cette légende disait "Exit".

5 Cliquez sur "View" puis "Code" dans le menu de niveau supérieur. Dans la fenêtre Code, tapez les lignes suivantes exactement comme indiqué:

Private Sub Command1_Click ()
Dim AppName As String
Si Option1 = True Then
Shell "Bloc-notes", vbNormalFocus
ElseIf Option2 = True Then
Shell "C: \ Program Files \ Internet Explorer \ iexplore.exe", vbNormalFocus
ElseIf Option3 = True Then
Shell "C \ windows \ system32 \ cmd.exe", vbNormalFocus
Else: AppName = InputBox ( "? Quelle application voulez-vous ouvrir")
Shell AppName, vbNormalFocus
Fin si
End Sub

Private Sub Command2_Click ()
Fin
End Sub

6 Appuyez sur "F5" pour exécuter le programme. Lorsque vous sélectionnez l'une des options proposées, puis cliquez sur "Open Application", le programme connexe se déroulera dans une nouvelle fenêtre. Si vous ne sélectionnez pas l'un de ces choix, et il suffit de cliquer sur le bouton "Open Application", un message apparaîtra, demandant le nom de l'application. Vous devez alors fournir le chemin complet vers le fichier exécutable pour le programme approprié. Si l'application existe dans le chemin du système, comme "Bloc-notes" fait à l'étape 5, vous pouvez ignorer le nom de chemin complet.

Conseils et avertissements

  • Utilisez l'Explorateur Windows pour identifier le chemin complet vers d'autres applications Windows et ensuite, soit remplacer ceux-ci pour les exemples ici ou utiliser la commande "Shell" comme vous le désirez dans vos propres applications Visual Basic.
  • La moindre erreur dans la saisie d'un chemin d'application et le nom de fichier fera apparaître une «erreur d'exécution 53 ': Fichier non trouvé" et provoquer l'arrêt du programme de travail.

          

Post a comment: