CommonDialog中同时打开多个文件实现.docxVIP

CommonDialog中同时打开多个文件实现（转） - VB编程 ?在Visual Basic中，通常用CommonDialog公共对话框来选择磁盘上的文件，在其Flags属性中加上cdlOFNAllowMultiselect风 格后，就允许选择多个文件。当只选择一个文件时，其文件名（包含路径）直接返回Filename属性，那么选择多个文件时呢？如果选择了多个文件，则Filename属性返回值格式为”路径_文件名1_文件名2_…”（_为字符Chr$(0)）。举一个例子，如果我们选择C: \1.txt文件，那么Filename=”C:\1.txt”；而同时选择了C:\1.txt和C:\2.txt两个文件后，则Filename=” C:\ 1.txt 2.txt”。我们要获取所选择文件的文件名，就必须对Filename字符串进行分离。分离的思路大致如下：先得到所选择文件的路径，然后将其从Filename字符串中去除，这样就只剩下了文件名。而这些文件名又有字符Chr$(0)分隔，剩下的就很好办了，即便文件名中有空格（Chr$(32)），也能正确的实现分离。所以，现在关键的问题是如何获取所选择文件的路径。VB中有一个内建的函数CurDir()，它能返回当前的路径。在CommonDialog中改变路径 会产生PathChange事件，这也将同时改变CurDir()函数的值，使其始