[已解决]请问insert执行的时候总是要提示的麽?

SunmoonBaby

我说 生化的那个 是在"血生化"窗体里的...
Private Sub K_AfterUpdate()
    Dim mySQL As String
    mySQL = "INSERT into 异常结果(异常项目,异常结果,检查时间,编号,姓名,性别,检查时年龄)"
    mySQL = mySQL & " values('K','" & Me.[K] & "',#" & Me.[检查时间] & "#," & Me.[编号] & ",'" & Me.[姓名] & "','" & Me.[性别] & "','" & Me.[检查时年龄] & "')"
    If Me.[K] > 5.5 Then Me.[K-性质] = "升高": CurrentDb.Execute mySQL
    If [K] < 3.5 Then [K-性质] = "降低": CurrentDb.Execute mySQL
End Sub

SunmoonBaby

终于搞定了,多谢各位指点啦!!!