commondialog问题?

Question

此控件返回的多个文件的结果是这样的，假如用filestr=commondialog.filename,那么，left(filestr,instr(filestr,chr(0))-1)得到获取的文件的路径，mid(filestr,instr(filestr,chr(0))+1)的到各个文件的名称列表，文件名之间同样用chr(0)隔开。

Answer 1

对不起，instr函数的参数少了一个，应该为instr(1,filestr,chr(0))

Answer 2

用
Dim FileArray As Variant
FileArray=Split(filestr,VbNullChar)
即可以得到一文件名数组