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

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

admin2015-05-29  26
问题 窗体上有1个名称为Command 1的命令按钮，事件过程如下：
Private Sub Command 1 Click()
Dim num As Integer，x  As  Integer
num=Val(InputBox("请输入一个正整数"))
Select Case hum
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语句，可以同时对条件的多个取值来判断。其格式为：
Select Case<测试表达式>
[Case<表达式列表1>]
[语句块1]
[Case  Else]
[语句块n]
End Select
Case语句以Select Case开头，以End Select结束。
其中，表达式列表1，表达式列表2，…称为域值。
可采用3种形式：
①表达式1[，表达式21…；
②表达式1 To表达式2；
③Is关系运算表达式。
其中，可使用的运算符有等于(=)、不等于(<>)、小于(<)、大于(>)、小于或等于(<=)、大于或等于(>=)。
转载请注明原文地址:https://kaotiyun.com/show/RCQp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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