VB如何打开程序所在的盘符？

来源：百度知道 编辑：UC知道 时间：2024/05/16 13:45:18
比如工程1.EXE在D:\123\，点击Command1就能打开D:\
把工程1.EXE放到E:\abc\里，点击Command1就能打开E:\

呵呵，首先呢，用App.Path取得程序运行的目录
在用Left(str,3)'str是刚才那个目录
取得盘符
然后Shell("explorer.exe " & a )就差不多了
具体这样
Dim RootPath as string
RootPath=Left(app.path,3)
Shell("Explorer.exe " & RootPath)

用commondialog控件的showopen方法

有点麻烦的哟！取得当前路径让后用 shell"explorer" /n 来打开就行了！要的话加QQ：314972270（只有晚上在线其它时候不在）