查询途径文件怎样只显示指定格式的文件

分类: IT文章 • 2024-04-06 11:30:23

查询路径文件怎样只显示指定格式的文件
以下代码显示所有格式文件
，如何只显示mdb格式的文件
如Private Sub Dir1_Change()
    File1.Pattern = ("*.*")
    File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
    Dir1.Path = Drive1.Drive
End Sub
------解决方案--------------------
File1.Pattern = ("*.mdb")