Question

vb.net2008 用OpenFileDialog打开多个文件并把全部文件的路径添加到Listb

vb.net2008 用OpenFileDialog打开多个文件并把全部文件的路径添加到Listbox1 这个怎么做呀

Answer 1

按照此方法绝对OK
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim opfile As New OpenFileDialog '声名新open 窗口
Dim filetmp() As String '存文件名
opfile.Filter = "文本文件(*.txt)|*.txt|所有文件(*.*)|*.*" '添加过滤文件
opfile.Multiselect = True '多开文件打开
If opfile.ShowDialog = Windows.Forms.DialogResult.OK Then '如果打开窗口OK
If opfile.FileName <> "" Then '如果有选中文件
ReDim filetmp(opfile.SafeFileNames.Length)
filetmp = opfile.SafeFileNames '取文件名
For i As Integer = 0 To filetmp.Length - 1
ListBox1.Items.Add(filetmp(i)) '添加文件名
Next
End If
End If
End Sub