[填空题] 下列程序的功能是:当x100时,没有意义。请填空。Private Sub Command1_Click() Dim x As Single x=InputBox("请输入x的

19 查阅

[填空题] 下列程序的功能是:当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语句。

计算机考试