[填空题] 下列程序的功能是:当X<50时,y=0.8×x;当50≤x≤100时,y:0.7×X;当x>100时,没有意义。请填空。 Private Sub
2021-07-20
[填空题] 下列程序的功能是:当X<50时,y=0.8×x;当50≤x≤100时,y:0.7×X;当x>100时,没有意义。请填空。
Private Sub Commandl_Click()
Dim x As Single
x=InputBox("请输入x的值!")
[10]
Case Is <50
Y=0.8*x
Case 50 To 100
Y=0.7*x
[11]
Print"输入的数据出界!"
End Select
Print x,y
End Sub
正确答案:Select Case x
词条内容仅供参考,如果您需要解决具体问题
(尤其在法律、医学等领域),建议您咨询相关领域专业人士。