下面的代码是让comdialog打开的对话框中实现多选，并找到路径。我想把所有选中的文件
名字及路径都放到一个listbox框中，用这样修改代码？请版主帮忙修改一下。谢谢







Dim repName As String
    Dim SelectFile() As String
    Dim i As Integer
    '选择导入的文件(可多选)
    ComDialog.Flags = cdlOFNAllowMultiselect + cdlOFNExplorer
    ComDialog.FileName = ""
    ComDialog.ShowOpen
    repName = ComDialog.FileName
    If repName = "" Then Exit Sub
    '将选择的文件用数组表示
    SelectFile = Split(repName, Chr(0))
    If UBound(SelectFile) = 0 Then
        ReDim SelectFile(1)
        SelectFile(1) = ComDialog.FileTitle
        SelectFile(0) = Left(repName, Len(repName) - Len(SelectFile(1)) - 1)
    End If
 
' SelectFile(0)中存放的是选择的路径
' SelectFile(1),...中存放的是选择的的文件名