只爱陌生人

一般说来，对于FileList控件的Pattern属性，都是按    file1.pattern="*.jpg;*.bmp;*.gif"  来设置的。
一天突发奇想，写成:
  file1.pattern="a*.*"         '显示文件夹下所有以a开头的文件
file1.pattern="a1?8.*"        '支持通配符*和？
这样一来，就可以毫不费劲地实现当前文件夹下更精确地查找文件了。如果再实现返回上级文件夹及进入下级子文件夹，就可以实现对当前驱动器上精确查找文件了。
       为什么以前书上没有讲过这种非标准的用法呢？？？

风雨声中

这是MSDN中的内容，多看看MSDN吧

Pattern 属性
一个用来指定文件规格的字符串表达式，例如 "*.*" 或 "*.FRM"。缺省值是 "*.*" 它返回所有文件的列表。除使用通配符外，还能够使用分号 (;) 分隔的多种模式。例如，"*.exe; *.bat" 将返回所有可执行文件和所有 MS-DOS 批处理文件的列表。


Pattern 属性示例
本例使用在 FileListBox 控件中所选择的新模式来更新 TextBox 控件。这些控件的建立，使得当用户在 TextBox 中输入一个模式时，比如 *.txt，它将被反映在 FileListBox 中，这很象基于 Windows 的应用程序中的典型“文件打开”对话框中所见到的交互作用。如果完整的路径，如 C:\Bin\*.exe 被输入到 TextBox 控件中，那么该文本将自动地被 FileListBox 控件分析为路径和模式两个部分。要试用此例，将下面的代码粘贴到包含以下控件的窗体的声明部分：DirListBox、FileListBox、TextBox、和 CommandButton。按 F5 键 并给 TextBox 键入一个有效的文件模式。

Private Sub Form_Load ()
   Command1.Default = True   ' 设置缺省属性。
End Sub

Private Sub Command1_Click ()
   ' 文本被分析为路径和模式两个部分。
   File1.Filename = Text1.Text
   Dir1.Path = File1.Path   ' 设置目录路径。
End Sub

Private Sub File1_PatternChange ()
   Text1.Text = File1.Pattern   ' 将文本设置为新模式。
End Sub

Private Sub Dir1_Change
   File1.Path = Dir1.Path   ' 设置文件列表框路径。
End Sub

风雨声中

看我的第一句。

我的建议是你多看看MSDN，很多VB书都是从MSDN中复制了几句，编成了一本书。好多东西都是皮毛，想认真的编程，还是看MSDN吧，肯定比看书强。