![[填空题] 下列程序的功能是：当x100时，没有意义。请填空。Private Sub Command1_Click() Dim x As Single x=InputBox("请输入x的](http://www.mshxw.com/aiimages/31/261578.png "[填空题] 下列程序的功能是：当x100时，没有意义。请填空。Private Sub Command1_Click() Dim x As Single x=InputBox(\"请输入x的")
[填空题] 下列程序的功能是：当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的值!")
参考答案：
【10】Select Case x【11】Case Else问题解析:
解析：阅读程序后，看到程序中有了Case和End Select子句，没有多分支选择结构的起始语句，很明显，第一个空应该填写多分支结构的起始语句Select Case x。在Select Case结构中，只有两个Case子句，分别表示x取值的两种情况，但题目中将x的值分为3种情况，可见第二个空应该填写Case Else语句。
