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 viene eseguito. Le capacità multitasking di Windows permettono che questo accada. Un singolo comando di Visual Basic compie l'operazione fino a quando si sa dove sul computer per trovare il file eseguibile che si apre l'applicazione desiderata. Tenuto conto di questa conoscenza e poche righe di codice, il comando "Shell" in Visual Basic fa il resto.

istruzione

1 Creare un nuovo programma di Visual Basic, fare clic sul modello "EXE standard" quando si apre Visual Basic. Questo fornisce una forma di base di un esempio di apertura applicazioni con il comando "Shell". Fai clic su "File" e "Salva progetto", inserendo un nome maschera e il progetto nome 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 collegare i suffissi predefiniti, "frm" per la forma e "vbp" per il nome del progetto.

2 Aggiungere un "OptionButton" per la forma con un doppio clic su questo controllo nel pannello "Strumenti" sulla sinistra dello schermo. L'icona per questo pulsante nella casella degli strumenti è costituito da un piccolo cerchio con un punto al centro. Fare clic su questo controllo sul form per visualizzare le proprietà nel pannello di destra. Fare doppio clic sulla proprietà "Caption" nella lista per evidenziare il nome di default. Cambiare questo a "Blocco note".

3 Ripetere il passaggio 2 per aggiungere altri due OptionButtons alla forma, modificando la proprietà didascalia per il secondo a "Internet Explorer" e il terzo su "Prompt dei comandi".

4 Fare doppio clic sull'icona "CommandButton", un piccolo rettangolo in un quadrato più grande nella Casella degli strumenti, per aggiungere questo al modulo. Modificare la proprietà Caption di questo pulsante per leggere "Open Application". Aggiungere un secondo controllo CommandButton al form nello stesso modo, ma fanno di questa didascalia diceva "Exit".

5 Fai 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 NomeApp As String
Se Option1 = True Then
Shell "Blocco note", vbNormalFocus
ElseIf Option2 = True Then
Shell "C: \ Programmi \ Internet Explorer \ iexplore.exe", vbNormalFocus
ElseIf Option3 = True Then
Shell "C \ windows \ system32 \ cmd.exe", vbNormalFocus
Else: AppName = InputBox ( "? Quale applicazione vuoi aprire")
Shell AppName, vbNormalFocus
Finisci se
End Sub

Private Sub Command2_Click ()
Fine
End Sub

6 Premere il tasto "F5" per eseguire il programma. Quando si seleziona una delle opzioni fornite e quindi fare clic su "Open Application", il programma relativo verrà eseguito in una nuova finestra. Se non si seleziona una di queste scelte, e basta fare clic sul pulsante "Apri applicazione", verrà visualizzato un messaggio chiedendo il nome dell'applicazione. Quindi è necessario fornire il percorso completo del file eseguibile per il programma appropriato. Se l'applicazione esiste nel percorso di sistema, come "Blocco note" fa al punto 5, quindi si può saltare il percorso completo.

Consigli e avvertenze

• Utilizzare Esplora risorse per individuare il percorso completo ad altre applicazioni di Windows e poi o sostituire questi per gli esempi qui o utilizzare il comando "Shell" come si desidera nelle proprie applicazioni Visual Basic.
• Il minimo errore di entrare in un percorso di applicazione e il nome del file, si apre un " 'Run-Time Error 53': file non trovato" e causare il programma di smettere di lavorare.