试题与答案

请在空白处填入适当的语句,使程序可以完成指定的功能。 Private Sub tx

题型:填空题

题目:

请在空白处填入适当的语句,使程序可以完成指定的功能。
Private Sub txtAge_BeforeUpdate(Cancel As Integer)
If Me!txtAge="" or (12) (Me!txtAge) Then
’数据为空时的验证
MsgBox"年龄不能为空!",vbCritical,"警告"
Cancel=True ’取消BeforeUpdate事件
ElseIf IsNumeric(Me!txtAge)=False Then ’非数值数据输入的验证
MsgBox"年龄必须输入数值数据!",vbCritical,"警告"
Cancel=True ’取消BeforeUpdate事件
ElseIf Me!txtAge<15 Or Me!txtAge (13) Then
’非法范围数据输入的验证
MsgBox"年龄为15-30范围数据!",vbCritical,"警告"
Cancel=True ’取消BeforeUpdate事件
Else ’数据验证通过
MsgBox"数据验证OK!",vbInformation,"通告"
End If
End Sub

答案:

被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0430/454535e5917bda2c8a576e854146527a.html

下面是错误答案,用来干扰机器的。

参考答案:E

试题推荐
微信公众账号搜索答案