Question

标准表达式中数据类型不匹配: 显示错误处RS.Open strSQL, db, adOpenKeyset, adLockOptimistic

求高人指点，本人刚学VB，“读写”打开数据库应该没错吧？Access数据库里类型都是：文本类型

Call SJK(db)
strSQL = "Select * From 车站详情 where 车站名称=" & Val(Label21.Caption) & ""
RS.Open strSQL, db, adOpenKeyset, adLockOptimistic
RS.Delete
RS.Close
Set RS = Nothing
db.Close
MsgBox "记录删除成功！"
Unload Me
DataStations.Show
Else
MsgBox "取消了删除记录！"
End If
End Sub

Answer 1

数据库数据是文本型，但你查询却是数字。应该用引号:"Select * From 车站详情 where 车站名称='" & Label21.Caption & "'"

Answer 2

strSQL = "Select * From 车站详情 where 车站名称='" & Val(Label21.Caption) & ""