首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序执行后,变量a的值为( )。 Dima,b,C,dAs Single a=10:b=20:c=40 If b>a Then d=a:a=b:b=d End If If c>a Then
下列程序执行后,变量a的值为( )。 Dima,b,C,dAs Single a=10:b=20:c=40 If b>a Then d=a:a=b:b=d End If If c>a Then
admin
2018-09-29
83
问题
下列程序执行后,变量a的值为( )。
Dima,b,C,dAs Single
a=10:b=20:c=40
If b>a Then
d=a:a=b:b=d
End If
If c>a Then
d=a:a=c:c=d
End If
If c>b Then
d=b:b=c:c=d
End If
选项
A、10
B、40
C、20
D、100
答案
B
解析
本题考查选择语句。程序段中包括3条选择语句,其作用分别为:如果a小于b那么交换a和b,如果a小于c那么交换a和c,如果b小于c那么交换b和c,相当于对a、b、c做了降序排列。
转载请注明原文地址:https://kaotiyun.com/show/WQFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:PrivateSubCommand1_Click()Staticaa=1:b=2:c=3Callf(a,b,c)Print
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:OptionBase1PrivateSubCommand1_Click()Dima(4,4)AsIntegerDimb
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框,其Text属性值为"VBProgramming"。运行程序后,选中其中的"VB",并执行如下事件过程:PrivateSubCommand1_Click()
(1)在名称为Forml的窗体上添加一个名称为Commandl的命令按钮,标题为“打开文件”,再添加一个名称为CDl的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码:①设置适当属性,使对话框的标题为
编写如下程序:PrivateSubCommand1_Click()Dima(3,3)AsIntegerDimb(3,3)AsIntegerFori=1To3Forj=1To3
编写如下程序:PrivateSubCommand1_Click()DimnumAsIntegerDimkAsInteger,nAsIntegernum=InputBox("请输入一个正整数:")k
编写如下程序:PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerDimarr()AsIntegern=InputBox("请输入数值:")ReDi
随机试题
某公司拟筹集资本1000万元,所得税税率为25%。各种资本来源如下:(1)按面值发行长期债券300万元,票面利率10%,每年付息一次,到期还本,不考虑筹资费用;(2)发行普通股70万股,每股发行价10元,筹资费用率4%,预计第一年每股股利为1元,以后
PowerPoint2003是一种______软件。
A.疖B.痈C.丹毒D.急性蜂窝织炎E.脓肿由溶血性链球菌引起的皮下和筋膜感染是
球结膜下水肿可见于()
下列项目中,()是会计核算的最终成果。
按照《中华人民共和国进出口关税条例》的规定,进出口货物的收发货人或其代理人在下列哪些情况下可以自缴纳税款之日起一年内,凭原纳税收据向海关书面申请退税?()
A.BuildYourKid’sWorkSkillsB.PlaceTimeLimitsonLeisureActivitiesC.TalkabouttheFutureonaRegularBasisD.Help
Thereisanongoingdebateaboutwhetherleadershipcanbetaught,andwhetherbusinessschools,inparticular,areteachingit.
"Cool"isawordwithmanymeanings.Itstraditionalmeaningisusedto【C1】______atemperaturethatisfairlycool.Astheworl
THE20THANNUALHOMEELECTRONICSSHOWJanuary20-24JoinusattheConventionCentertoseethelatesti
最新回复
(
0
)