Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim AppPath As String = Directory.GetCurrentDirectory() '获取应用程序的当前工作目录 Process.Start(AppPath) '打开当前目录 End Sub
新华网站制作公司哪家好，找创新互联建站！从网页设计、网站建设、微信开发、APP开发、成都响应式网站建设公司等网站项目制作，到程序开发，运营维护。创新互联建站自2013年起到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选创新互联建站。
我也找来的，只找到这个，希望对你有帮助。
这个就是你要的了！希望你能用！
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim AppPath As String = Directory.GetCurrentDirectory() '获取应用程序的当前工作目录
Process.Start(AppPath) '打开当前目录
End Sub
忘了说，这个要引用命名空间！
把Imports System.IO 写到代码最上边就好了！
System.Environment.CurrentDirectory;
//例: c:/test/
Application.ExecutablePath;(包括名称）
//例: c:/test/myapp.exe
Application.StartupPath;（不包括名称）
//例: c:/test/
绝对路径是直接到达目标位置，通常是从盘符开始的路径。完整的描述文件位置的路径就是绝对路径，以web站点根目录为参考基础的目录路径。
绝对路径名的指定是从树型目录结构顶部的根目录开始到某个目录或文件的路径，由一系列连续的目录组成，中间用斜线分隔，直到要指定的目录或文件，路径中的最后一个名称即为要指向的目录或文件。之所以称为绝对，意指当所有网页引用同一个文件时，所使用的路径都是一样的。
扩展资料
几种编程语言获取程序所在路径的方法：
1、在golang程序里面获取程序所在路径：
package main
import (
"path/filepath"
"os"
"fmt"
"log"
)
func main() {
execDir, err := filepath.Abs(filepath.Dir(os.Args[0]))
if err = nil {
log.Fatal(err)
}fmt.Println(execDir)
}
2、python脚本所在路径：
import os
print(os.path.split(os.path.realpath(__file__))[0])
3、shell脚本获取脚本的绝对路径：
DIR="$( cd "$( dirname "${BASH_SOURCE[0]}" )" pwd )"
见上图，用鼠标按照上述三个步骤先后次序，一一单击进行选择和设置，“生成输出路径”。
那么，在你的程序代码里使用：
MsgBox(Application.StartupPath)
显示的就是，你的当前默认的相对路径。
用
App.Path
可以返回本程序所在目录的路径,重要用目录列表框(DirListBox)就可以查找并打开了.
命名空间:System.Windows.Forms
Application.StartupPath 属性(返回String)
获取启动了应用程序的可执行文件的路径，不包括可执行文件的名称。
Application.ExecutablePath 属性(返回String)
获取启动了应用程序的可执行文件的路径，包括可执行文件的名称。