首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

getfilenames的有关问题

2012-01-12 
getfilenames的问题求助!现在能够实现单个文件路径和文件名的提取,实现方法如下:PrivateSubButton1_Click(

getfilenames的问题求助!
现在能够实现单个文件路径和文件名的提取,实现方法如下:
Private   Sub   Button1_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button1.Click
                OpenFileDialog1.ShowDialog()
                Dim   path   As   String   =   OpenFileDialog1.FileName
                ListBox1.Items.Add(System.IO.Path.GetFullPath(path))
                ListBox2.Items.Add(System.IO.Path.GetFileNameWithoutExtension(path))
        End   Sub

可是如果我要想用在openfiledialog中选择多个文件后,如何在listbox1和listbox2中分别显示这多个文件的路径和文件名呢?
请予以帮助,多谢!

[解决办法]
OpenFileDialog1.Multiselect = True
OpenFileDialog1.Filter = "所有文件(*.*)|*.* "
If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim i As Int32 = OpenFileDialog1.FileNames.Length
Dim path() As String = OpenFileDialog1.FileNames //定义string数组
Dim x As Int32 = 0
For x = 0 To i - 1 //循环遍历
path(x) = OpenFileDialog1.FileNames(x) //获取文件名
ListBox1.Items.Add(path(x)) //加到listbox
ListBox2.Items.Add(path(x).Substring(path(x).LastIndexOf( "\ "))) //取子字节
Next
End If

热点排行