vb编程如何指定路径，让用户自己指定某程序如：d:QQBinQQ.exe，并运行。

加一个文本框，让用户自己在文本框里输入指定路径：

程序如下：

Private Sub Command1_Click()

Dim router1 As String ‘用来存储指定路径

Dim ReturnValue

router1 = Text1Text '将文本框里输入的指定路径给router1

ReturnValue = Shell(router1)

End Sub

这样你在文本框里输入指定路径如：d:\QQ\Bin\QQexe，只要你路径正确就能启动这个程序了

哦了

你的代码执行不了，是因为少了一个空格，再就是引号加错位置了，按照你指定的路径格式，用app。path写出来应该是这样的：

正确写法：

shell appPath & "\aexe " & apppath & "\bkku" ,vbNormalFocus

call shell("XXX",vbNormalFocus)

加个timer，设为XX秒：

sendkeys "%{F4}"

timer1enabled=false

你只要用一个if语句判断msgbox返回的是“是”（vbTure）还是“否”（vbNo）就行了。如果是“是”就不用管它，代码会自动往下执行，如果是“否”就End，代码如下：

If MsgBox("是否执行？", 4 + 32, "提示") = vbNo Then

End

End If

这个可以用Shell勾子来监视系统正在打开的窗口，然后通过返回的

窗口句柄

来判断是不是你要的那个指定程序，如果是的话就用Msgbox来d出你要的消息。

如果需要代码的话，可以给我发站内消息。

以上就是关于vb编程如何指定路径，让用户自己指定某程序如：d:\QQ\Bin\QQ.exe，并运行。全部的内容，包括:vb编程如何指定路径，让用户自己指定某程序如：d:\QQ\Bin\QQ.exe，并运行。、VB如何调用 指定目录下的程序打开一个文件、VB运行指定程序，窗口在最前.用的shell指令.等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！