[填空題] 下列程序的功能是：當x＜50時，y=0.8×x；當50≤x≤100時，y=0.7×x；當x＞100時，沒有意義。請?zhí)羁铡? Private Sub
2021-07-20
[填空題] 下列程序的功能是：當x＜50時，y=0.8×x；當50≤x≤100時，y=0.7×x；當x＞100時，沒有意義。請?zhí)羁铡?/p>
Private Sub Command1_Click()
Dim x AS Single
x=InputBox("請輸入x的值!")
(14)
Case Is＜50
y=0.8*x
Case 50 To 100
y=0.7*K
(15)
Print"輸入的數(shù)據(jù)出界!"
End Select
Print x，y
End Sub
正確答案：Select Case x
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。