An einem gewissen Punkt könnte es vorteilhaft sein, eine Windows-Anwendung unter Visual Basic . Zum Beispiel können Sie sich zu öffnen und mit einer anderen Anwendung arbeiten, während eine Visual Basic-Anwendung ausführt . Die Multitasking-Fähigkeiten von Windows zulassen, dass dies geschieht. Eine einzelne Visual Basic Befehl führt die Aufgabe , solange Sie wissen, wo auf dem Computer , um die ausführbare Datei, die die gewünschte Anwendung öffnet zu finden. Angesichts dieses Wissen und ein paar Zeilen Code , funktioniert die "Shell "-Befehl in Visual Basic den Rest erledigen. Anleitung
1

Erstellen Sie ein neues Visual Basic-Programm , indem Sie auf die Schaltfläche " Standard EXE " -Vorlage , wenn Visual Basic öffnet. Dies stellt eine Grundform für ein Beispiel Öffnen von Anwendungen mit der "Shell "-Befehl. Klicken Sie auf " Datei" und " Projekt speichern unter " Eingabe eines Namens und Form Projektnamen als in den kleinen öffnende Fenster dazu aufgefordert werden. Für dieses Beispiel verwenden " OpenWindowsApp " als Name und Form " Öffnen Sie den Windows -App ", wie den Namen des Projekts . Visual Basic wird legen die Standard- Endungen " . Frm ", um die Form und " . Vbp ", um den Namen des Projekts .
2

hinzufügen " OptionButton " auf die Form durch einen Doppelklick auf diese Steuerung in der "Toolbox" -Panel auf der linken Seite des Bildschirms . Das Symbol für diese Schaltfläche in der Toolbox besteht aus einem kleinen Kreis mit einem Punkt in der Mitte. Klicken Sie auf dieses Steuerelement auf dem Formular , um die Eigenschaften auf der rechten Seite zu sehen. Auf die Eigenschaft "Caption" Doppelklicken Sie in der Liste, um den voreingestellten Namen zu markieren. Ändern Sie dies in "Notepad ".
3

Wiederholen Sie Schritt 2 , um zwei weitere OptionButtons zum Formular hinzufügen , die Änderung der Caption-Eigenschaft für das zweite auf "Internet Explorer" und die dritte auf " Eingabeaufforderung ".
4

Doppelklicken Sie auf die Schaltfläche" CommandButton "-Symbol , ein kleines Rechteck in einem größeren Platz in der Toolbox , um diese zum Formular hinzufügen . Ändern Sie die Caption-Eigenschaft dieser Schaltfläche zu lesen " Open Application . " Fügen Sie eine zweite Befehlsschaltfläche zum Formular in der gleichen Weise , aber machen diese Beschriftung lesen " Exit".
5

Klicken Sie auf " Ansicht" und dann "Code" in der Top-Level- Menü . Im Code-Fenster , geben Sie die folgenden Zeilen genau wie dargestellt :

Private Sub Command1_Click () Dim AppName Wie StringIf Option1 = True ThenShell "Notepad " , vbNormalFocusElseIf Option2 = True ThenShell "C: \\ Program Files \\ Internet Explorer \\ iexplore.exe " , vbNormalFocusElseIf Option3 = True ThenShell " C \\ windows \\ system32 \\ cmd.exe " , vbNormalFocusElse : AppName = InputBox ( " Was willst du Anwendung zu öffnen " ) Shell AppName , vbNormalFocusEnd IfEnd Sub