在DataCombo1的Click事件中对Recordset对象使用Find方法,比如
Dim Rs as ADODB.RecordSet
.......
Private Sub DataCombo1_Click()
    Rs.Find 字段名 = DateCombo1.Text
End Sub

解决方案 »

  1.   

    可是DataCombo2,DataCombo3如何刷新和DataCombo1的同一个记录呢?
      

  2.   

    因为以上三个DataCombo控件都是绑定到数据源,所以当Recordset移动时他们会自动进行刷新的。
      

  3.   

    如DataCombo1的字段名为姓名,数据:有张三,李四。
    DataCombo2的字段名为学历,数据:本科,大专。
    DataCombo1的值原是张三,改变值为李四后,DataCombo2的值如何自动变为大专?
    张三  本科
    李四  大专
      

  4.   

    将Recordset的LockTpye设定为批处理。
    不知道你前面是怎样做的,我想你应该已经绑定了,不然不会在DataCombo中显示数据。既然绑定了,就不必去理会什么刷新之类,当Recordset通过Find方法找到匹配记录时,所有记录会自动移动,在DataCombo2,DataCombo3中会自动显示相应记录的。