回 帖 发 新 帖 刷新版面

主题:怎样使用打开文件对话框实现对ListBox项的添加?

怎样使用打开文件对话框实现对ListBox项的添加?
我自己已经写了这么一点代码,但是下面就不会怎样做了,试过几次都是代码出错.

    Private Sub MenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem2.Click
        '设置事件状态栏显示
        StatusBarPanel1.Text = "正在添加文件..."
        '打开对话框
        OpenFileDialog1.ShowDialog()
        '存储文件名的数组
        Dim FileNames() As String

    End Sub

回复列表 (共2个回复)

沙发

Dim FileNames = OpenFileDialog1.FileNames
Dim i as int
for i=0 to FileNames.Length-1 step 1
listbox1.Items.Add(FileNames(i))
next

板凳

谢谢你给了我补充的代码.不过我还要完善它.

我来回复

您尚未登录,请登录后再回复。点此登录或注册