ACCESS VBA窗体问题

2025-02-26 10:44:39

推荐回答（1个）

回答1：

你写的[Form_ct]![Text0] + [Form_ct]![Text3] 是字符相加，如果要达到数值相加的效果要先进行类型转换如
Private Sub Command16_Click()
If Combo4 = "+" Then
If val([Form_ct]![Text0]) + val([Form_ct]![Text3]) = val([Form_ct]![Text17]) Then
MsgBox "您答对了"
Beep
ElseIf val([Form_ct]![Text0]) + val([Form_ct]![Text3]) <> val([Form_ct]![Text17]) Then
Beep
MsgBox "您答错了"
End If
End If