向老师学习代码限制输入

大学　发表于：2011-06-06 16:38:36 　

在:Private Sub 保存_Click()
If Me.总分 + Me.加分 > Me.加分值 Then
MsgBox "未能保存,您本月的加分已经达到加分上限!"
Me.学生编号 = Null
Me.加分 = Null
Me.学生姓名 = Null
Exit Sub
End If

这一段代码中

先用:If Me.总分 + Me.加分 > 20 Then

可以起限制作用

If Me.总分 + Me.加分 > Me.加分值 Then

不能限制任何数据,何故?

123xiaoniu 发表于：2011-06-06 18:13:56

你改写成这样就可以的了：

If ccur(Me.总分) + ccur(Me.加分) > ccur(Me.加分值 ) Then

大学发表于：2011-06-06 18:44:36

谢谢你,问题总算得到解决了!

总记录：2篇页次：1/1 9 1 :

Access交流中心