关于vb.net显示文件路径的信息

求VB.NET获取文件路径的方法Dim my_path() As String = System.IO.Directory.GetFiles("d:\", "文件名", IO.SearchOption.AllDirectories)
因为有可能在多个地方 , 所以进行了全盘搜索,歌曲的所有地址路径在数组my_path中
在vb.net中如何在textbox里显示listbox里的文件路径?Imports System.IO
Public Class Form4
Private Sub ButtonCreatPrg_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles ButtonCreatPrg.Click
If Directory.Exists(TextBox_PrgPos.Text) Then
If TextBox_PrgName.Text = "" Then
'可以在此检查项目是否重复建立.
MessageBox.Show("请输入一个有效vb.net显示文件路径的名称.")
Else
TextBox_CreatDate.Text = Now.ToString
Dim NewItem As New PrgInfo(TextBox_PrgName.Text, TextBox_PrgPos.Text, Now)
Dim NewItemList As List(Of PrgInfo)
If ListBox_AllPrg.Tag Is Nothing Then
NewItemList = New List(Of PrgInfo)
Else
NewItemList = CType(ListBox_AllPrg.Tag, List(Of PrgInfo))
End If
NewItemList.Add(NewItem)
ListBox_AllPrg.Tag = NewItemList
End If
End If
End Sub
Private Sub ListBox_AllPrg_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox_AllPrg.SelectedIndexChanged
If ListBox_AllPrg.SelectedIndex0 Then
Return
End If
If ListBox_AllPrg.Tag Is Nothing Then
Return
End If
Dim ItemList As List(Of PrgInfo)
ItemList = CType(ListBox_AllPrg.Tag, List(Of PrgInfo))
TextBox_PrgName.Text = ItemList(ListBox_AllPrg.SelectedIndex).PrgName
TextBox_PrgPos.Text = ItemList(ListBox_AllPrg.SelectedIndex).PrgPath
TextBox_CreatDate.Text = ItemList(ListBox_AllPrg.SelectedIndex).CreatDate
End Sub
End Class
Public Class PrgInfo
Public Sub New(ByVal SetPrgName As String, ByVal SetPrgPath As String, ByVal SetPrgDate As DateTime)
MyBase.New()
PrgName = SetPrgName
PrgPath = SetPrgPath
CreatDate = SetPrgDate
End Sub
Private _PrgName As String
Public Property PrgName() As String
Get
Return _PrgName
End Get
Set(ByVal value As String)
_PrgName = value
End Set
End Property
Private _PrgPath As String
Public Property PrgPath() As String
Get
Return _PrgPath
End Get
Set(ByVal value As String)
_PrgPath = value
【关于vb.net显示文件路径的信息】End Set
End Property
Private _CreatDate As DateTime
Public Property CreatDate() As DateTime
Get
Return _CreatDate
End Get
Set(ByVal value As DateTime)
_CreatDate = value
End Set
End Property
End Class
VB.NET中怎么找到EXE程序所在的路径见上图,用鼠标按照上述三个步骤先后次序 , 一一单击进行选择和设置 , “生成输出路径” 。
那么,在你的程序代码里使用:
MsgBox(Application.StartupPath)
显示的就是 , 你的当前默认的相对路径 。
也可以按照自己的需要重新设置该路径 。
关于vb.net显示文件路径和的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息 , 记得收藏关注本站 。

    推荐阅读