[填空题] 下列程序的功能是:当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
[填空题] 下列程序的功能是:当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截止日期:2024-12-31 11:05:09
←请使用支付宝扫码支付VIP截止日期:2024-12-31 11:05:09
←请使用微信扫码支付