首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Commandl_Click() Dim m As Integer,n As Integer m=2:n=1 Select Case m Case l Select C
编写如下程序: Private Sub Commandl_Click() Dim m As Integer,n As Integer m=2:n=1 Select Case m Case l Select C
admin
2020-04-18
31
问题
编写如下程序:
Private Sub Commandl_Click()
Dim m As Integer,n As Integer
m=2:n=1
Select Case m
Case l
Select Case n
Case 1
Print”AAA”
Case 2
Print”BBB”
Case 2
Print”CCC”
End Select
End Sub
程序运行后,单击命令按钮Commandl,输出结果为
选项
A、AAA
B、BBB
C、CCC
D、1
答案
C
解析
多分支控制结构又称为Select Case语句或Case语句,可以同时对条件的多个取值来判断。本题是一个嵌套的Select Case语句,首先判断m的值,本题由于m的值为2,所以不会执行Case 1分支,直接执行Case 2分支输出“CCC”
转载请注明原文地址:https://kaotiyun.com/show/aaTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Commandl的命令按钮,编写如下事件过程:PrivateSubCommandl_Click()n=0Fori=0To10X=2*i.1IfXMod3=0Then
编写如下程序:OptionBase1PrivateSubCommandl_Click()Dimaa=Array(1,2,3,4):s=0:j=1Fori=4To1Step-1
在窗体上画1个名称为Commandl的命令按钮,并编写如下事件过程:PrivateSubCommandl_Click()x=1;s=0Fori=1To5x=x/i:s=s+xNe
设窗体上有一个文本框Text1和一个命令按钮Commandl,并有以下事件过程:PrivateSubCommandl_Click()DimSAsString.chAsStrings=""Fork=1ToLen(Textl)ch
在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序:FunctionFun(xAsInteger,YAsInteger)AsIntegerFun=IIf(x
编写如下程序:PrivateSubCommandlClick()DimaAsInteger,bAsIntegera=3:b=2Ifa*b0EndSub程序运行后,单击命令按钮Comman
设有如下程序:Subf(xAsInteger,ByValyAsInteger)x=2*x:y=y+xEndSubPrivateSubCommandl_Click()Di
现有如下一段程序:OptionBase1PrivateSubCommandl_Click()Dimaa=Array(3,5,7,9):x=1Fori=4To1Step-1s=s+a
随机试题
大雾天在高速公路遇事故不能继续行驶时怎样处置?
以下哪种疾病不属于结缔组织疾病:
脊柱侧凸最常见的类型是
中药全浸膏粉制颗粒,常选用的润湿剂是
项目还本资金来源主要有()。
按国家建设部规定,工程项目总造价中应预留()的尾留款作为质量保修费,待工程项目保修期结束后最后拨付。
2014年7月1日,某公司按面值发行总额为6000万元,期限为5年,票面年利率为5%,到期一次还本付息的债券。2015年12月31日,该债券的账面价值为()万元。
Toavoidthevariousfoolishopinionstowhichmanisliable,nosuperhumangeniusisrequired.Afewsimpleruleswillkeepyou
Menhavedistinguishedthemselvesfromotheranimals,andindoingsosecuredtheirsurvivalbytheabilitytoobserveandunder
Formanypeopletoday,readingisnolonger【S1】______.Tokeepuptheirworktheymustreadletters,reports,tradepublicatio
最新回复
(
0
)