VB制作的简单文件搜索器

代码说明：

VB制作的简单文件搜索器,因水平有限,急需完善。。。。。VERSION 5.00 Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX" Begin VB.Form FrmMain BorderStyle = 1 "Fixed Single Caption = "文件搜索器" ClientHeight = 1590 ClientLeft = 45 ClientTop = 390 ClientWidth = 3990 Icon = "FrmMain.frx":0000 LinkTopic = "Form1" MaxButton = 0 "False ScaleHeight = 1590 ScaleWidth = 3990 StartUpPosition = 3 "窗口缺省 Begin VB.CommandButton Command3 Caption = "清除信息" Height = 300 Left = 1560 TabIndex = 5 Top = 1155 Width = 1575 End Begin MSComDlg.CommonDialog CommonDialog1 L