[填空題] 下列程序的功能是:當x<50時,y =0.8 xx;當50≤x≤100時,y=0.7 xx;當x>100時, Private Sub Comma
2021-07-20
[填空題] 下列程序的功能是:當x<50時,y =0.8 xx;當50≤x≤100時,y=0.7 xx;當x>100時,
Private Sub Command1_Click()
Dim x As Single
x = InputBox("請輸入x的值" )
Select Case x
Case Is<50
y=0.8 * x
Case 50 To 100
y=0.7 * x
【12】
Print "輸入數(shù)據(jù)出界!"
End Select
Print x, y
End Sub
正確答案:Case Else
參考解析:閱讀程序后,在Select Case結(jié)構(gòu)中,只有兩個Case子句,分別表示x取值的兩種情況,但題目中將 x的值分為3種情況,空白處應(yīng)該填寫Case Else語句。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。