当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。 Private Sub Command1_Click() Dim x AS Single x=InputBox("请输入x的值!") ______ Case Is<50   y=0.8*x  Case 50 To 100   y=0.7*K ______ Print"输入的数据出界!" End Select P

  

参考答案:

SelectCasex

  参考解析

微信端