( 13 ) 对窗体 test 上文本框控件 txtAge 中输入的学生年龄数据进行验证 。 要求 : 该文本框中只接受大于等于 15 且小于等于 3 。的数值数据,若输入超出范围则给出提示信息。该文本控件的 BeforeUpdate 事件过程代码如下,请在空白处填入适当的语句,使程序可以完成指定的功能。Private Sub txtAge_ BeforeUpdate ( Cancel As Integer )If Me!txtAge= “” Or 【 14 】( Me!txtAge ) Then’ 数据为空时的验证MsgBox “ 年龄不能为空! ” , vbCritical , “ 警告 ”Cancel=True ’ 取消 BeforeUpdate 事件ElseIf IsNumeric ( Me!txtAge ) =False Then’ 非数值数据输入的验证MsgBox “ 年龄必须输入数值数据! ” vbCritical, “ 警告 ”Cancel=True ‘ 取消 BeforeUpdate 事件ElseIf Me!txtAge15 Or Me!txtAge 【 15 】 Then’ 非法范围数据输入的验证MsgBox “ 年龄为 15 一 30 范围数据! ” , vbCritical, “ 警告 ”Cancel= True ’ 取消 BeforeUpdate 事件Else ’ 数据验证通过MsgBox “ 数据验证 .K! ” , vbInformation, “ 通告 ”End IfEnd Sub
( 13 ) 对窗体 test 上文本框控件 txtAge 中输入的学生年龄数据进行验证 。 要求 : 该文本框中只接受大于等于 15 且小于等于 3 。的数值数据,若输入超出范围则给出提示信息。该文本控件的 BeforeUpdate 事件过程代码如下,请在空白处填入适当的语句,使程序可以完成指定的功能。
Private Sub txtAge_ BeforeUpdate ( Cancel As Integer )
If Me!txtAge= “” Or 【 14 】( 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 【 15 】 Then
’ 非法范围数据输入的验证
MsgBox “ 年龄为 15 一 30 范围数据! ” , vbCritical, “ 警告 ”
Cancel= True ’ 取消 BeforeUpdate 事件
Else ’ 数据验证通过
MsgBox “ 数据验证 .K! ” , vbInformation, “ 通告 ”
End If
End Sub
相关考题:
( 22 ) Access 数据库中 , 若要求在窗体上设置输入的数据是取自某一个表或查询中记录的数据 , 或者取自某固定内容的数据,可以使用的控件是A )选项组控件B )列表框或组合框控件C )文本框控件D )复选框、切换按钮、选项按钮控件
窗体中有一个年龄文本框 txtAge,下面 代码可以获得文本框中的年龄值。A.int age = txtAge;B.int age = txtAge.Text;C.int age = Convert.ToInt32(txtAge);D.int age = int.Parse(txtAge.Text);
11、要验证文本框中输入的数据是否为合法的邮编,需要使用()验证控件。A.RequiredFieldValidatorB.RangeValidatorC.CompareValidatorD.RegularExpressionValidator
判断用户通过输入界面中的文本框控件输入的信息是否是偶数,要求用验证控件实现,我们需要选择哪种验证控件()?A.RequiredFieldValidatorB.RangeValidatorC.CompareValidatorD.CustomerValidator
35、在窗体中,若想利用文本框控件来输入操作密码,则必须对其()属性进行设置。A.名称B.控件来源C.输入掩码D.默认值