Private Sub DataCombo2_KeyDown(KeyCode As Integer, Shift As Integer)
 If KeyCode = 13 Then
    Ado_item.Recordset.MoveFirst
    Ado_item.Recordset.Find "itemcode = '" & DataCombo2.Text & "'"
    If Ado_item.Recordset.EOF Then
        MsgBox "find error"        
    End If       
 End Ifado_item和datacombo2是关联的,我在组合框中输入值后回车.
我输入的都是ado_item中有的值,怎么办?