sql="select 客户编码 from 表1"
adodc1.recordsource=sql
adodc1.refresh
adodc1.recordset.find "客户编码=1"

解决方案 »

  1.   

    DIM RST AS ADODB.RECORDSET
    DIM SEARCHSTRING AS STRING
    RST.OPEN "SELECT 姓名,工作单位 FROM 通讯录"
    SEARCHSTING="姓名='"+TEXT1.TEXT+"'"
    RST.FIND SEARCHSTRING
      

  2.   

    rstMY.Find('"字段名='XX‘“)
    if not rstMy.Eof then
       MsgBox "找到这条记录"
    endif
      

  3.   

    sql="select * from Table Where 姓名 Like & '%" & Text1.Text & "%'" 
    Adodc1.RecordSource=sql
    Adodc1.Refresh
    If Adodc1.RecordSet.RecordCount>0 Then MsgBox  "找到这条记录" 
    Adodc1.RecordSet.Find  "姓名='" & Text1.Text & "'"
      

  4.   

    Find 只支持一个条件
    你可以使用Filter
    此可以持多个条件!