当前位置:   article > 正文

[VB.NET]请问如何从OpenFileDialog中读取所有文件名到Listbox_vb.net openfiledialog 文件名

vb.net openfiledialog 文件名
VB.NET源码-156个实用实例哦…… <script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
请问如何从OpenFileDialog中读取所有文件名到Listbox
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
On Error Resume Next
With OpenFileDialog1
.Multiselect = True
.FileName =
.Filter = Excel文件(*.xls)|*.xls
.FilterIndex = 1
End With
OpenFileDialog1.ShowDialog()
ListBox1.Items.Add(OpenFileDialog1.FileName)
End Sub

请问如何从OpenFileDialog中读取所有文件名到Listbox?
__________________________________________________________________________
问题已经解决,不知是否正确?

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
On Error Resume Next
Dim s As String
With OpenFileDialog1
.Multiselect = True
.FileName =
.Filter = Excel文件(*.xls)|*.xls
.FilterIndex = 1
End With
OpenFileDialog1.ShowDialog()
For Each s In OpenFileDialog1.FileNames
ListBox1.Items.Add(s)
Next
End Sub
__________________________________________________________________________
那你用选取文件夹的方式好了。。。。

FolderBrowserDialog:

If Me.FolderBrowserDialog1.ShowDialog() = DialogResult.OK Then
Me.ListBox1.DataSource = IO.Directory.GetFiles(Me.FolderBrowserDialog1.SelectedPath)
End If
__________________________________________________________________________
en 可以这么解决
__________________________________________________________________________
With OpenFileDialog1
.Multiselect = True
.FileName =
.Filter = Excel文件(*.xls)|*.xls
.FilterIndex = 1
End With
OpenFileDialog1.ShowDialog()

ListBox1.Items.AddRange(OpenFileDialog1.FileNames)
__________________________________________________________________________
不必用循环而用ListBox.Items.AddRanage就可以加一个集合进来了,如上.
__________________________________________________________________________
高手啊!
佩服!
__________________________________________________________________________
感谢fangxinggood(JustACoder) 和平民百姓等高手!
__________________________________________________________________________
声明:本文内容由网友自发贡献,不代表【wpsshop博客】立场,版权归原作者所有,本站不承担相应法律责任。如您发现有侵权的内容,请联系我们。转载请注明出处:https://www.wpsshop.cn/w/知新_RL/article/detail/203307
推荐阅读
相关标签
  

闽ICP备14008679号