首页 > 计算机 > 计算机考试 正文

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

时间:2021-07-20 18:35:56 解答: 82 次

[填空题] 下列程序的功能是:当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 * x      【 】      Print"输入的数据出界!"   End Select   Print x,y  End Sub

正确答案:

Select Case x

参考解析:

阅读程序后,看到程序中有了Case和End Select子句,没有多分支选择结构的起始语句,很明显,第一个空应该填写多分支结构的起始语句Select Case x。在Select Case结构中,只有两个Case子句,分别表示x取值的两种情况,但题目中将x的值分为3种情况,可见第二个空应该填写Case Else语句。

  • 相关题库

请充值VIP继续使用(未注册用户支付后会自动注册登录)

×

95元 29元

VIP截止日期:2024-12-31 11:05:09

←请使用支付宝扫码支付

95元 29元

VIP截止日期:2024-12-31 11:05:09

←请使用微信扫码支付