Question

如何用VB设计一个简单的应用程序来实现“单击按钮打开运行计算机中的某个应用程序”

如：点击 a.exe中的“打开”按钮就能执行计算机中的b.exe文件。

用其他的程序语言也可以~~
最好附上源码，没有的话，有关键语句也行

Answer 1

用win32api函数
shellexecute
它是最好的
原型为
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
'再窗体画个按钮
private sub command1_click()
ShellExecute me.hwnd,"open","文件路径","运行参数","",显示方式

end sub
'其中文件路径为你要打开的文件，当然不只exe文件，如果是exe文件则可以带参数，显示方式有很多种，为1时表示正常显示

Answer 2

Dim ProcID As Integer
' Run Calculator.
ProcID = Shell("C:\Windows\system32\calc.exe", AppWinStyle.NormalFocus)
' The preceding path is for Windows XP;
' The Windows 2000 path is C:\WINNT\system32\calc.exe.
这是一段调用系统自带计算器的代码,把上面的代码加到一个事件中去试试(比如:button_click事件),就明白了.

如果a.exe和 b.exe在同一目录下，可以像楼上那样写，如果不在，就写相对路径或绝对路径（上例为绝对路径)

Answer 3

首先在窗体上建立一个按钮，编写该按钮的单击事件如下：
Dim ProcID As Integer
' Run Calculator.
ProcID = Shell("C:\Windows\system32\calc.exe", AppWinStyle.NormalFocus)
' The preceding path is for Windows XP;
' The Windows 2000 path is C:\WINNT\system32\calc.exe.

Answer 4

最简单的用shell语句
Private Sub Command1_Click()
Shell "b.exe"
End Sub
其中b.exe为完整路径，省略路径指同目录。

Answer 5

这样就可以

Private Sub Command1_Click()
Shell "b.exe"
End Sub

给你个连接,学习下吧,呵呵
http://www.xuevb.net/modules/news/article.php?storyid=781