2. 计算机
  3. 窗体上有1个名称为Commandl的命令按钮，事件过程如下： Pfivme Sub Commandl_Click() Dim num As Integer．x As Integer num=Val(InputBox("请输入一个正整数")) S

窗体上有1个名称为Commandl的命令按钮，事件过程如下： Pfivme Sub Commandl_Click() Dim num As Integer．x As Integer num=Val(InputBox("请输入一个正整数")) S

admin2017-06-21  55
问题 窗体上有1个名称为Commandl的命令按钮，事件过程如下：
Pfivme Sub Commandl_Click()
  Dim num As Integer．x As Integer
  num=Val(InputBox("请输入一个正整数"))
  Select Case Dam
   Case Is＞100
    x=x+num
   Case Is＜90
    x=num
   Case Else
    x=x*num
   End Select
Print x；
End Sub
运行程序，并在三次单击命令按钮时，分别输入正整数100、90和60，则窗体上显示的内容为
选项 A、0   0   0
B、0   0   60
C、0   90   0
D、100   0   60
答案B
解析 多分支控制结构又称为Select Case语句或Case语句，可以同时对条件的多个取值来判断。本题中第一次输入100执行Case EIse分支，由于x是默认初值0所以输出0：第二次输入90也执行Case Else分支，由于x是默认初值0所以输出0；第三次输入60执行第二个分支输出60。
转载请注明原文地址:https://www.kaotiyun.com/show/IXGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)