Dim a As Long, b As Long    a=1
    b=2    Dim db As Database, sql As String
    Set db = OpenDatabase("database.mdb")
    sql = "update DB set ID='" & a & "' where ID='" & b & "'"
    db.Execute sqlID是长整形,提示类型不匹配,如何解决?多谢!