A un certo punto può risultare utile eseguire un'applicazione Windows in Visual Basic. Per esempio, potrebbe essere necessario aprire e lavorare con un'altra applicazione mentre viene eseguita un'applicazione Visual Basic. Le funzionalità multitasking di Windows permettono questo accada. Un singolo comando di Visual Basic esegue l'operazione fino a quando sai dove sul computer per trovare il file eseguibile che 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 cliccando sul modello "EXE Standard" quando si apre Visual Basic. Questo fornisce un modulo di base per un esempio di apertura delle applicazioni con il comando "Shell". Fare clic su "File" e "Salva progetto con nome," immettere un nome di modulo e il nome del progetto come richiesto nelle piccole finestre apribili. In questo esempio, utilizzare "OpenWindowsApp" come il nome del modulo e la "Open Windows App" come nome del progetto. Visual Basic verrà collegato i suffissi predefinito, "FRM" al form e "vbp" al nome del progetto.

2

Aggiungere al form un controllo "OptionButton" facendo doppio clic su questo controllo nel pannello "Casella" sulla sinistra dello schermo. L'icona per il pulsante della 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" nell'elenco per evidenziare il nome predefinito. Modificare questo "Blocco note".

3

Ripetere il passaggio 2 per aggiungere due ulteriori pulsanti di opzione per la forma, cambiando la proprietà caption per il secondo a "Internet Explorer" e il terzo "Prompt dei comandi."

4

Fare doppio clic sull'icona "CommandButton", un piccolo rettangolo in un quadrato più grande nella casella degli strumenti, di aggiungere questo al form. Modificare la proprietà caption del pulsante per leggere "Domanda aperta". Aggiungere un secondo controllo CommandButton al form nello stesso modo, ma rendere questa didascalia leggere "Exit".

5

Fare clic su "Visualizza" e quindi "Codice" nel menu in alto. Nella finestra del codice, digitare le seguenti righe esattamente come indicato:

Private Sub Command1_Click)
Dim AppName As String
Se val1 = True Then
Shell "Notepad", 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
Altro: AppName = InputBox ("quale programma vuoi aprire?")
Shell AppName, vbNormalFocus
End If
End Sub

Private Sub Command2_Click()
Fine
End Sub

6

Premere "F5" per eseguire il programma. Quando si seleziona una delle opzioni specificate e quindi fare clic su "Open Application", il programma verrà eseguito in una nuova finestra. Se non si seleziona una di queste scelte, e tu fai clic sul pulsante "Open Application", verrà visualizzato un messaggio, chiedendo per il nome dell'applicazione. È quindi necessario fornire il percorso completo al file eseguibile per il programma appropriato. Se l'applicazione presente nel percorso di sistema, così come "Blocco note" nel passaggio 5, quindi è possibile ignorare il nome di percorso completo.

Consigli & Avvertenze

• Utilizzare Esplora risorse di Windows per identificare il percorso completo di altre applicazioni di Windows e quindi sostituire questi per gli esempi qui o utilizzare il comando "Shell" come volete nelle proprie applicazioni di Visual Basic.
• Il minimo errore nell'immissione di un nome di percorso e il file di applicazione farà apparire un "" errore di Run-Time 53': File non trovato "e causare il programma smettere di funzionare.