2. 计算机
  3. 在窗体上从左到右有Text1、Text2两个文本框(见图)，要求运行程序时在Text1中输入—个分数后按回车键，则判断分数的合法性，若分数为0～100中的—个数，则光标移到Text2中；否则光标不动，并弹出对话框“分数错”。下面程序中正确的是______。

在窗体上从左到右有Text1、Text2两个文本框(见图)，要求运行程序时在Text1中输入—个分数后按回车键，则判断分数的合法性，若分数为0～100中的—个数，则光标移到Text2中；否则光标不动，并弹出对话框“分数错”。下面程序中正确的是______。

admin2009-03-17  48
问题 在窗体上从左到右有Text1、Text2两个文本框(见图)，要求运行程序时在Text1中输入—个分数后按回车键，则判断分数的合法性，若分数为0～100中的—个数，则光标移到Text2中；否则光标不动，并弹出对话框“分数错”。下面程序中正确的是______。
选项 A、Private Sub Text1_KeyPress(KeyAscii As Integer)       IfKeyAscii=13 Then    ’回车符的ASCII码是13           a=Va1(Text1)           If a＞=0 Or a＜=100 Then               Text2.SetFocus           Else               Text1.SetFocus : MsgBox("分数错")           End If        End If    End Sub
B、Private Sub Text1_KeyPress(KeyAscii As Integer)        IfKeyAscii=13 Then    ’回车符的ASCII码是13           a=Val(Text1)           Ifa＞=0 And a＜=100 Then              Text1.SetFocus           Else              Text2.SetFocus : MsgBox("分数错")           End If        End If    End Sub
C、Private Sub Text1_KeyPress(KeyAscii As Integer)        IfKeyAscii=13 Then    ’回车符的ASCII码是13           a=Val(Text1)           If a＜0 And a＞100 Then               Text2.SetFocus           Else               Text1.SetFocus : MsgBox("分数错")           End If        End If    End Sub
D、Private Sub Text1_KeyPress(KeyAscii As Integer)        IfKeyAscii=13 Then    ’回车符的ASCII码是13           a=Val(Text1)            If a＞=0 And a＜=100 Then              Text2.SetFocus           Else              Text1.SetFocus : MsgBox("分数错")           End If        End If    End Sub
答案D
解析 本题要求的条件是0～100，那么条件表达式应该是a＞=0 And a＜=100。If语句的执行方式是当“条件”为真的时候，执行Then后面的语句；“条件”为假，执行Else后面的语句。
转载请注明原文地址:https://kaotiyun.com/show/5j1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)