在窗體上從左到右有Text1、Text2兩個文本框(見圖),要求運行程序時在Text1中輸入—個分數(shù)后按回車鍵
在窗體上從左到右有Text1、Text2兩個文本框(見圖),要求運行程序時在Text1中輸入—個分數(shù)后按回車鍵,則判斷分數(shù)的合法性,若分數(shù)為0~100中的—個數(shù),則光標移到Text2中;否則光標不動,并彈出對話框“分數(shù)錯”。下面程序中正確的是______。
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("分數(shù)錯") 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("分數(shù)錯") 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("分數(shù)錯") 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("分數(shù)錯") End If End If End Sub
正確答案:D解析:本題要求的條件是0~100,那么條件表達式應該是a>=0 And a=100。If語句的執(zhí)行方式是當“條件”為真的時候,執(zhí)行Then后面的語句;“條件”為假,執(zhí)行Else后面的語句。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。