填空题 下列程序的功能是：当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=07 *x
(12)
Print“输入的数据出界！”
End Select
Print X，y
End Sub

  • 1、
【正确答案】 1、Case Else    
【答案解析】[解析] 阅读程序后，在Select Case结构中，只有两个Case子句，分别表示x取值的两种情况，但题目中将x的值分为3种情况，空白处应该填写Case Else语句。