主题：模糊查找？

你这个不难，但是繁琐着呢，你要根据不同的列类型分别写，因为只有字符列才能用Like，而且字符列用单引号，日期列用#，数值列不用。

就用自带的高级筛选窗口吧，以后我将这个窗口改为非模式窗口。

 

 

例如我们需要在当前表中的公司名称列中，查找包括“湛江”二字的单位：

 

With CurrentTable
    Dim r As Integer
    r = .FindRow("[公司名称] Like '*湛江*'", .Position + 1, True ) '从当前行开始查找
    If r >= 0 Then '如果找到的话
        .Position = r '定位到找到的行。
    End If
End With

 

参考：

http://www.foxtable.com/help/topics/0553.htm

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目898.table

做个简单例子发上来说话

将文件发上来，如果数据保密，可以保留少量虚假数据就行。

如果你怕别人看见的话，可以设置个解压密码