vb 打开文件夹

来源：百度知道 编辑：UC知道 时间：2024/06/09 20:24:43
1在VB中怎样用代码打开一个文件夹。。。。。这个文件夹不知道在哪个盘符?可以吗
2我做了一个VB程序，已经做了一个安装程序给别人安装在别的电脑上，这个VB程序要调用到安装目录里的附件，但别人要安装时安装目录都不是一样的，所以VB程序要怎样才能调用这个附件呢

App.Path&“文件夹名\文件”

兄弟，结合你的两个问题看，其实你是遇到了一个问题，解决的办法是使用相对路径，方法如下：
第一种：用楼上的那位仁兄的方法
比如你的附件是在abc文件加夹的abc.exe，然后你要打开它，就可以写入如下代码。
Dim StrFileName as string
StrFileName=App.Path & "\abc\abc.exe"
Shell StrFileName, vbNormalFocus
第二种：就是用Directory.GetCurrentDirectory
使用的方法就是跟上面的差不多了。
努力吧，兄弟！！

我认为绿色一点的方法 是把附件加到资源文件中
运行时释放到EXE文件所在目录 而程序中一律用相对路径
来指定附件 就是App.Path+"\附件名"

Private Type BrowseInfo
lngHwnd As Long
pIDLRoot As Long
pszDisplayName As Long
lpszTitle As Long
ulFlags As Long
lpfnCallback As Long
lParam As Long
iImage As Long
End Type

Private Const BIF_RETURNONLYFSDIRS = 1