我苦思冥想,终于可以给你一个满意的回答。
直接用 Call Shell("Explorer。exe " & App。Path, vbNormalFocus) 即可,不必如我初想那样复杂。
对 Windows 系统路径的文件,可以省略路径。
这里用到 Explorer。exe 的一个功能,即"Explorer。exe 文件夹目录"。"文件夹目录"相当于函数 Explorer。exe 的参数。
1。假设你的程序是 USB:\Folder\Product。exe
Private Sub Object_Click()
Call Shell("Explorer。
exe " & Replace(App。Path, "Folder", ""), vbNormalFocus)
End Sub
这样就直接浏览 USB:\ 目录。
2。假设你的程序是 USB:\Product。exe
Private Sub Object_Click()
Call Shell("Explorer。
exe " & App。Path, vbNormalFocus)
End Sub
这样也直接浏览 USB:\ 目录。
注意:"Explorer。exe "尾部有空格。
。
答：按钮制作的视频教程/ ?? 我感觉！自己多看看好的作品！还有多做！就好了！关键是多做！一定会进步很快的 黑客动画吧详情>>
答：线性链表分好几种,分为单链,双链等,它们的存储顺序也不一样. 线性表是顺序存储的,占顺序的存储空间详情>>
问：电脑安装了VB6.0，为什么打开方式里面没有VB程序选项，进安装好的VB里去关联...
答：打开方式最下面还有一个《选择程序》，点开后查VB的安装目录的EXE，找到后直接打开，下次就会在打开方式里查到了详情>>
