Question

VS2010里的VB问题：如何用 OpenFileDialog 组件打开多个文件到listbox里

Answer 1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        OpenFileDialog1.Filter = "All files(*.*)|*.*"
        OpenFileDialog1.FileName = ""
        OpenFileDialog1.Multiselect = True
        OpenFileDialog1.ShowDialog()
        If OpenFileDialog1.FileNames.Length > 0 Then
            ListBox1.Items.Clear()
            For Each fn As String In OpenFileDialog1.FileNames
                ListBox1.Items.Add(fn)
            Next
        End If
    End Sub

 

Answer 2

Multiselect属性设置为true