Question

vb 通用对话框 打开对话框 多选的问题

从知道中搜索到了"vb 通用对话框 打开对话框 多选的Filename问题"
见地址: http://zhidao.baidu.com/question/106736780.html
里面所得的结果是全部完整的路径添加到了listbox中.
现在只需要将所得的全部文件名添加到listbox中,该如何解决呢?

我将其中的FileName更改为FileTitle怎么无法实现呢?
主要是.List1.AddItem a(i),而不应该是List1.AddItem a(0) & "\" & a(i)
不过其中的a = Split(CommonDialog1.FileName, " ")
中的""要改为chr(0)
O(∩_∩)O谢谢了

Answer 1

CommonDialog1.Flags = cdlOFNAllowMultiselect
CommonDialog1.Filter = "*.*|*.*"
CommonDialog1.ShowOpen
a = Split(CommonDialog1.FileName, " ")
For i = 1 To UBound(a)
List1.AddItem a(i)
Next i