下列程序的功能是：当x100时
下列程序的功能是：当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
请帮忙给出正确答案和分析，谢谢！
参考解答
4jj***264
2023-07-22 03:01:26
正确答案：Select Case x Case Else
阅读程序后，看到程序中有了Case和EndSelect子句，没有多分支选择结构的起始语句，很明显，第一个空应该填写多分支结构的起始语句SelectCasex。在SelectCase结构中，只有两个Case子句，分别表示x取值的两种情况，但题目中将x的值分为3种情况，可见第二个空应该填写CaseElse语句。
相似问题
在窗体上画一个命令按钮 然后编写如下程序：(假定变量x是一个窗体级变量) Dim x As Inte
在窗体上画一个命令按钮，然后编写如下程序：(假定变量x是一个窗体级变量) Dim x As Integer Sub inc(a As Integer) x=x+a End Sub Private
程序执行结果S的值是【 】。 Private Sub Command1_Click() i=0 Do
程序执行结果S的值是【 】。 Private Sub Command1_Click() i=0 Do i=i+1 s=i+s Loop Until i＞=4 Print s End Sub请帮忙给出正确答案和分析，谢谢！
如果在D盘当前文件夹下已2经存在名为PIC.day的顺序文件 那么执行语句Open 'D:/PIC.
如果在D盘当前文件夹下已2经存在名为PIC day的顺序文件，那么执行语句Open "D: PIC dat " For Append As 1 之后将【 】。请帮忙给出正确答案和分析，谢谢！
以下变量名中 ______ 是不符合Visual Basic的命名规范的。A．Abc901C．pr
以下变量名中， ______ 是不符合Visual Basic的命名规范的。A．Abc901C．price_D．K请帮忙给出正确答案和分析，谢谢！
建立随机文件Workers．dat。存取职工的姓名和职工号 然后把该文件中的数据读出显示。请在空白处
建立随机文件Workers．dat。存取职工的姓名和职工号，然后把该文件中的数据读出显示。请在空白处填入适当的语句。 Type Worker name As String*8 n
