vb.net路径,vb打开文件路径

VB.net怎么弹出文件夹路径选择框

选择文件夹  在工具箱 - 对话框 里选择 FolderBrowserDialog 添加 到设计器中

新洲ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景，ssl证书未来市场广阔！成为创新互联的ssl证书销售渠道，可以享受市场价格4-6折优惠！如果有意向欢迎电话联系或者加微信：028-86922220（备注：SSL证书合作）期待与您的合作！

然后 代码写在  按钮事件里

FolderBrowserDialog1.ShowDialog()

textbox1.text =FolderBrowserDialog1.SelectedPath

选择文件 在工具箱 - 对话框 里选择 OpenFileDialog

把 OpenFileDialog1.ShowDialog()

TextBox1.Text = OpenFileDialog1.FileName

写到按钮事件下

如图

点击按钮会弹出 通用对话框  选择好路径后 确定 ，编辑框里就会显示选择的路径

如何获取VB.NET窗体所在路径

1、如果你的窗体就是你当前工程这个EXE本身的窗体，

那么窗体所在的路径就是工程的启动路径，用下面的语句获取：

AppPath=Application.StartupPath

2、如果你的窗体是你自己LoadLibrary的某个DLL的窗体，那么你既然能LoadLibrary，就应该知道它的路径，所以不用问了。

在VB.NET中如何取得当前目录的路径?

命名空间:System.Windows.Forms

Application.StartupPath 属性(返回String)

获取启动了应用程序的可执行文件的路径，不包括可执行文件的名称。

Application.ExecutablePath 属性(返回String)

获取启动了应用程序的可执行文件的路径，包括可执行文件的名称。

vb.net链接数据库用相对路径

可以用程序安装目录等相对路径：

比如：

cn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+AppDomain.CurrentDomain.SetupInformation.ApplicationBase"+information.mdb;Persist Security Info=False")

AppDomain.CurrentDomain.SetupInformation.ApplicationBase和Application.StartupPath

当将程序安装在"C:\Program Files\ABC"目录中时，以下两个属性返回的内容是不同的：

——AppDomain.CurrentDomain.SetupInformation.ApplicationBase 返回"C:\PROGRA~1\ABC\"

——Application.StartupPath则返回"C:\Program Files\ABC"。

目前已知在服务（Windows Service）中使用AppDomain .CurrentDomain.AppendPrivatePath("C:\Program Files\ABC")会无效，用AppDomain .CurrentDomain.AppendPrivatePath("C:\PROGRA~1\ABC\")则没问题。

而在窗口程序中（Windows Forms），则前者亦有效。

vb.net从文件路径中获取文件名

获取方法，参考实例如下：

'获取路径名各部分: 如： c:\dir1001\aaa.txt

'获取路径路径 c:\dir1001\

Public Function GetFileName(FilePathFileName As String) As String '获取文件名 aaa.txt

On Error Resume Next

Dim i As Integer, J As Integer

i Len(FilePathFileName)

J InStrRev(FilePathFileName, "\")

GetFileName Mid(FilePathFileName, J + 1, i)

End Function

''获取路径路径 c:\dir1001\

Public Function GetFilePath(FilePathFileName As String) As String '获取路径路径 c:\dir1001\

On Error Resume Next

Dim J As Integer

J InStrRev(FilePathFileName, "\")

GetFilePath Mid(FilePathFileName, 1, J)

End Function

'获取文件名但不包括扩展名 aaa

Public Function GetFileNameNoExt(FilePathFileName As String) As String '获取文件名但不包括扩展名 aaa

On Error Resume Next

Dim i As Integer, J As Integer, k As Integer

i Len(FilePathFileName)

J InStrRev(FilePathFileName, "\")

k InStrRev(FilePathFileName, ".")

If k 0 Then

GetFileNameNoExt Mid(FilePathFileName, J + 1, i - J)

Else

GetFileNameNoExt Mid(FilePathFileName, J + 1, k - J - 1)

End If

End Function

'＝＝＝＝＝ '获取扩展名 .txt

Public Function GetFileExtName(FilePathFileName As String) As String '获取扩展名 .txt

On Error Resume Next

Dim i As Integer, J As Integer

i Len(FilePathFileName)

J InStrRev(FilePathFileName, ".")

If J 0 Then

GetFileExtName ".txt"

Else

GetFileExtName Mid(FilePathFileName, J, i)

End If

End Function

VB.NET中怎么找到EXE程序所在的路径

见上图，用鼠标按照上述三个步骤先后次序，一一单击进行选择和设置，“生成输出路径”。

那么，在你的程序代码里使用：

MsgBox(Application.StartupPath)

显示的就是，你的当前默认的相对路径。

也可以按照自己的需要重新设置该路径。