扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
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
创新互联公司服务项目包括峨山县网站建设、峨山县网站制作、峨山县网页制作以及峨山县网络营销策划等。多年来，我们专注于互联网行业，利用自身积累的技术优势、行业经验、深度合作伙伴关系等，向广大中小型企业、政府机构等提供互联网行业的解决方案，峨山县网站推广取得了明显的社会效益与经济效益。目前，我们服务的客户以成都为中心已经辐射到峨山县省份的部分城市，未来相信会继续扩大服务区域并继续获得客户的支持与信任！
我也找来的，只找到这个，希望对你有帮助。
命名空间:System.Windows.Forms
Application.StartupPath 属性(返回String)
获取启动了应用程序的可执行文件的路径，不包括可执行文件的名称。
Application.ExecutablePath 属性(返回String)
获取启动了应用程序的可执行文件的路径，包括可执行文件的名称。
这个就是你要的了！希望你能用！
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 写到代码最上边就好了！
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网