Ad un certo punto si potrebbe trovare vantaggioso per eseguire un'applicazione Windows in Visual Basic . Per esempio, potrebbe essere necessario aprire e lavorare con un'altra applicazione mentre un'applicazione Visual Basic esegue . Le capacità multitasking di Windows permettere che ciò accada . Un singolo comando di Visual Basic compie l'operazione fino a quando si sa dove il computer per trovare il file eseguibile che si apre l'applicazione richiesta . Data questa conoscenza e poche righe di codice , il comando " Shell" in Visual Basic fa il resto . Istruzioni
1

Creare un nuovo programma di Visual Basic , fare clic sul " EXE standard " modello all'apertura di Visual Basic . Questo fornisce una forma di base di un esempio di apertura di applicazioni con il comando "Shell" . Fare clic su "File" e " Salva progetto con nome ", inserire un nome di modulo e il nome del progetto come richiesto nelle piccole finestre apribili . Per questo esempio , utilizzare " OpenWindowsApp ", come il nome del modulo e " Aprire Windows App ", come il nome del progetto . Visual Basic verrà allegare i suffissi predefiniti , " . Frm " per la forma e " . Vbp " al nome del progetto .
2

Aggiungi un " OptionButton " per la forma con un doppio clic su questo controllo nel pannello " Toolbox" a sinistra dello schermo . L'icona di questo pulsante nella casella degli strumenti è costituito da un piccolo cerchio con un punto al centro . Fare clic su questo controllo nel modulo per visualizzare le proprietà nel pannello di destra . Fare doppio clic sulla proprietà " Caption " nella lista per evidenziare il nome di default . Cambia questo a " Notepad ".

3 Ripetere il punto 2 per aggiungere altri due OptionButtons alla forma , modificando la proprietà Caption per il secondo a " Internet Explorer " e la terza a " Prompt dei comandi ".
4

Fare doppio clic sull'icona" CommandButton " , un piccolo rettangolo in una grande piazza nella casella degli strumenti per aggiungere questo al form. Modificare la proprietà di didascalia di questo pulsante per leggere " Apri applicazione ". Aggiungere un secondo controllo CommandButton al form nello stesso modo , ma fare questa didascalia diceva "Exit ".
5

Fare clic su " Visualizza" e poi "Codice " nel menu di livello superiore . Nella finestra del codice , digitare le seguenti righe esattamente come mostrato:

Private Sub Command1_Click ( ) Dim AppName As StringIf Option1 = True ThenShell "notepad ", vbNormalFocusElseIf Opzione2 = True ThenShell "C: \\ Program Files \\ Internet Explorer \\ iexplore.exe " , vbNormalFocusElseIf Option3 = True ThenShell " C \\ windows \\ system32 \\ cmd.exe " , vbNormalFocusElse : AppName = InputBox ( " Qual applicazione vuoi aprire " ) Shell AppName , vbNormalFocusEnd IfEnd sub