VB异步处理应用实例：磁盘文件全文搜索

文件搜索FileFind(V1.0.0)使用说明

文件名：FileFind.exe
版  本：1.0.0

概述：
    这是一个使用Visual Basic开发的文件全文搜索工具，可以为Visual Basic应用程序提供异步的文件全文检索功能。

授权：
    自由软件，欢迎复制传播。

用户接口过程
Public Sub FindStart(ByRef ReturnList As Collection, ByVal Root As String, ByVal Recurse As Boolean, _
                     ByVal FileTypes As String, ByVal StrFileSize As String, ByVal StartDate As String, _
       ByVal EndDate As String, ByVal Attributes As VbFileAttribute, _
                     ByVal Compare As VbCompareMethod, ParamArray StrToFind() As Variant)

公用事件过程
Public Event FindFilesCurrentDir(ByVal CurrentDirectory As String)
Public Event FindFilesFound(ByVal Path As String, ByVal FileName As String, ByVal FirstSearchWordFound As String)
Public Event FindFilesDone(ByRef ReturnList As Collection)
Public Event FindFilesCancel(ByRef CancelFind As Boolean)
Public Event FindFilesError(ByVal ErrorMessage As String)

使用方法：

打开或新建Visual Basic项目，在Project->Refereces中点击"Browse.."，选择FileFind.exe

详细的使用请参考附带的Visual Basic工程。

请在这里下载示例程序

请下载文件名为FileFind.rar的文件