网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

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)

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

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


网站名称:vb.net路径,vb打开文件路径
转载注明:http://bjjierui.cn/article/hddpgs.html

其他资讯