Question

我用VB6.0在编写一个程序 我要这个程序的Command1_Click()控件运行这个程序所在的盘的.exe程序

请大家想想代码

Answer 1

Private Sub Command1_Click()
Shell App.Path & "\abc.exe"
End Sub

追问

不行 呵呵

追答

这个要运行的exe文件和本exe文件是否在同一个文件夹？

追问

是在同一盘内

追答

我是问你是不是在同一个文件夹内！在同一盘内也有可能不在同一个文件夹啊

追问

汗 那在代码里指定盘内路径不就行了

追答

如果abc.exe在当前程序的某个子目录内，则这样：
Private Sub Command1_Click()
Shell App.Path & "\子目录名\abc.exe"
End Sub
这样就不论什么盘符都行了

如果abc.exe在当前程序的同一个子目录内，则这样：
Private Sub Command1_Click()
Shell App.Path & "\abc.exe"
End Sub

Answer 2

shell (cmd /c start d:\abc.exe) 这样

追问

不是的 我是在不确定盘符的情况下 因为我这是放在U盘里 要运行U盘里的文件 随时会改变盘符

追答

你的程序就是在U盘上是不是？

追问

这么说吧 我做的程序是没有固定盘符的

追答

你就说你这个程序是不是在U盘上，要是我给你整个是的
不是给你整个是的。

是的话不就简单了？

追问

嗯 是吧

追答

Shell left(app.Path,3) & "win98\setup.exe"