Help: lỗi Data Type mismatch in criteria expression
boy333 > 24-04-13, 03:08 AM
mình đang học VBA cho access nhưng gặp lỗi này mà không biết sửa sao nhờ mọi người giúp đỡ với ah. code đây:
Private Sub Command1_Click()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("SELECT * FROM Hoadonnhap WHERE sohoadon = '10'")
If rs.RecordCount > 0 Then
rs.MoveFirst
rs.Edit
rs.Fields("remark") = "dasua"
rs.Update
End If
End Sub
lỗi ở dòng câu lệnh select. sohoadon la type dang number
Mong mọi người giúp đỡ ạ