vb代码求解析
Private Sub cmd1_Click()
Dim MESSAGE As String
' Adodc1.RecordSource = "select * from ma where (ma.操作员 like " + Chr(34) + Combo1.Text + Chr(34) + ")"
' Adodc1.Refresh
Adodc1.RecordSource = "select * from ma where 操作员='" + Combo1.Text + "'"
Adodc1.Refresh
If Adodc1....