全球旧事资料 分类
名为cmdTest)。当单击“测试”按钮时,执行的事件功能是:首先弹出消息框,若单击其中的“确定”按钮,则隐藏窗体上的“显示”按钮:否则直接返回到窗体中。请在空白处填入适当的语句,使程序可以完成指定的功能。PrivateSubcmdTestClick()在“时钟”文本框中显示当前时间
A
swer【MsgBox】“隐藏按钮?”(,vbOKCa
celvbQuestio
“Msg”)IfA
swervbOKThe
MecmdDisplayVisible【False】E
dIfE
dSub
(13)对窗体tes七上文本框控件七xtAge中输入的学生年龄数据进行验证。要求:该文本框中只接受大于等于15且小于等于3。的数值数据,若输入超出范围则给出提示信息。该文本控件的BeforeUpdate事件过程代码如下,请在空白处填入适当的语句,使程序可以完成指定的功能。PrivateSubtxtAge_BeforeUpdate(Ca
celAsI
teger)IfMetxtAge“”Or【ISNULL】__(MetxtAge)The
’数据为空时的验证MsgBox“年龄不能为空!,vbCritica工,”“警告”Ca
celTrue’取消BeforeUpdate事件
E1seIfIsNumeric(MetxtAge)FalseThe
’非数值数据输入的验证MsgBox“年龄必须输入数值数据!vbCritical“警告””Ca
celTrue‘取消BeforeUpdate事件ElseIfMetxtAge15OrMetxtAge【30】The
’非法范围数据输入的验证MsgBox“年龄为15一30范围数据!,vbCritical“警告””’取消BeforeUpdate事件Ca
celTrue’取消BeforeUpdate事件Else’数据验证通过
MsgBox“数据验证K”,vb工
formatio
“通告”E
dIf
fE
dSub
fr
好听全球资料 返回顶部