Køre andet program fra en app

Kan gøres med shell. F.eks:
RetVal = Shell("C:\WINDOWS\CALC.EXE", 1)  ' Run Calculator

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbenlr98/html/vafctShell.asp

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const SW_SHOWNORMAL = 1

Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", "program.exe",vbNullString, "C:\", vbnormalfocus
End Sub

eller istedet for vbnormalfocus brug SW_SHOWNORMAL

mcgoat: Hvorfor bruge et API-kald, når man kan "nøjes" med blot at skrive
  Shell "c:\mitprogram.exe"

fordi det ikke ser så fedt ud at der kommer en DOS-Promt frem.. det er mere rigtigt at gøre det på den anden måde.. netop gennem Windows API kald...

Oki :o)