dim str as string
str=""
str="字段名='" & text1 & "'"
recordset.find str
if recordset.eof then msgbox "没有符合条件的" else msgbox "ok"

解决方案 »

  1.   

    找到了是找到了  但是datagrid没有指向该记录啊  为什么?
      

  2.   

    要用绑定的ADODC的记录集。假定datagrid1绑定ADODC1:
    ADODC1.recordset.find str
      

  3.   

    用adodb的recordset记录集不行吗set rs as new adodb.recordsetrs.find str
         
      

  4.   

    有一点注意就是调用find还有一个方向问题,如果处理不好有可能出现错误
    比如默认向下,如果连续调用就有可能漏掉结果
      

  5.   

    rs.find str
    set datagrid1.datasource =rs
    datagrid1.refresh