窗体上有1个名称为Commandl的命令按钮,事件过程如下: Private Sub Command l_Click() Dim hum As Integer,x As Integer num:Val(InputBox(“请输入一个正整数”)) Selec

admin2015-11-24  36

问题 窗体上有1个名称为Commandl的命令按钮,事件过程如下:
Private Sub Command l_Click()
Dim hum As Integer,x As Integer
num:Val(InputBox(“请输入一个正整数”))
Select Case hum
Case Is>100
x=x+hum
Case Is<90
X=num
Case Else
x=x* num
End Select
Print x:
End Sub
运行程序,并在三次单击命令按钮时,分别输入正整数100、90和6

选项 A、0 0 0
B、0 0 60
C、0 90 0
D、100 0 60

答案B

解析 多分支控制结构又称为Select Case语句或Case语句,可以同时对条件的多个取值来判断。其格式为:同14题。本题中第一次输入100执行Case Else分支,由于x是默认初值0所以输出0;第二次输入90也执行CaseElse分支,由于x是默认初值0所以输出0:第三次输入60执行第二个分支输出60。
转载请注明原文地址:https://jikaoti.com/ti/NaJ0FFFM
0

最新回复(0)