问题:[选择题]
A.PrivateSubText1_KeyPress(KeyAsciiAsIntegeIfKeyAscii=13Then"回车符的ASCII码是13a=Va1(Text1)Ifa>=0Ora<=100ThenText2.SetFocusElseText1.SetFocus:MsgBox("分数错")EndIfEndIfEndSub
B.PrivateSubText1_KeyPress(KeyAsciiAsIntegeIfKeyAscii=13Then"回车符的ASCII码是13a=Val(Text1)Ifa>=0Anda<=100ThenText1.SetFocusElseText2.SetFocus:MsgBox("分数错")EndIfEndIfEndSub
C.PrivateSubText1_KeyPress(KeyAsciiAsIntegeIfKeyAscii=13Then"回车符的ASCII码是13a=Val(Text1)Ifa<0Anda>100ThenText2.SetFocusElseText1.SetFocus:MsgBox("分数错")EndIfEndIfEndSub
D.PrivateSubText1_KeyPress(KeyAsciiAsIntegeIfKeyAscii=13Then"回车符的ASCII码是13a=Val(Text1)Ifa>=0Anda<=100ThenText2.SetFocusElseText1.SetFocus:MsgBox("分数错")EndIfEndIfEndSub
● 参考解析
[评析]本题要求的条件是0~100,那么条件表达式应该是a>=0Anda<=100。If语句的执行方式是当“条件”为真的时候,执行Then后面的语句;“条件”为假,执行Else后面的语句。