![[填空题] 下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。 Private Sub Command1](http://www.mshxw.com/aiimages/31/593444.png "[填空题] 下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。 Private Sub Command1")
[填空题] 下列程序的功能是：当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的值!") Select Case x Case Is＜50 y=0.8*x Case 50 To 100 y=0.7*x ______ Print"输入的数据出界!" End Select Print x,y End Sub
正确答案：Case Else
参考解析：[命题目的] 考查考生对多分支控制结构的掌握。 [解题要点] 阅读程序后，在Select case结构中，只有两个Case子句，分别表示x取值的两种情况，但题目中将x的值分为3种情况，空白处应该填写case Else语句。 [错解分析] 嵌套使用多分支控制结构时，应注意程序执行过程。 [考点链接] Select Case…End Select多分支结构语句应用。
