vb中find 查找问题,大家帮帮忙,我不太懂vb
发布网友
发布时间:2024-10-24 15:07
我来回答
共1个回答
热心网友
时间:2天前
Private Sub Command1_Click()
Adodc1.Refresh
Adodc1.Recordset.MoveFirst ' 移动记录指针到第一条记录上
Adodc1.Recordset.Find "tpy like '" & Text1.Text & "'" ' 用.Find方法查找指定
If Adodc1.Recordset.EOF Then MsgBox "无此型号!", , "提示"
End Sub