首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Commandl—Click() Dim score As Integer score=86 If score>85 Then r=1 ElseIf score>60 Then r=2 Else r=0 End If
编写如下程序: Private Sub Commandl—Click() Dim score As Integer score=86 If score>85 Then r=1 ElseIf score>60 Then r=2 Else r=0 End If
admin
2017-12-13
64
问题
编写如下程序:
Private Sub Commandl—Click()
Dim score As Integer
score=86
If score>85 Then
r=1
ElseIf score>60 Then
r=2
Else
r=0
End If
Print r
EndSub
程序运行后,单击命令按钮Command1,输出结果为( )。
选项
A、0
B、1
C、2
D、86
答案
B
解析
本题考查If…Else If…Else…End If语句。条件判断成立则执行对应分支的语句。86>85,所以r=1。选B)。
转载请注明原文地址:https://kaotiyun.com/show/yuGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
不能触发滚动条(如图所示)Change事件的操作是______。
有如下函数过程:Functionfun1(ByValxAsInteger,ByValyAsInteger)AsIntegerDoWhiley<>0reminder=xMo
函数Str$(2536)的值是【】。
运行下面的程序后,输出的结果为ClsDimt(5,5)asIntegerFori=1To5:t(i,i)=1:NextFori=1To5Forj=1To5Printt(i,j),Next
要获得当前驱动器应使用驱动器列表框的哪个属性______。
刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是()。
骰子是一个正六面体,用1~6这六个数分别代表这六面,掷一次骰子出现的数可表示为______。
文件根据数据性质,可分为【】文件和【】文件。
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
能够存放组合框的所有项目内容的属性是
随机试题
有多中心的起源分泌粘蛋白
流行性出血热治疗原则中的“三早一就”不包括
在电力系统发生故障时,根据系统要求提供必要的强行励磁倍数,强励时间有何规定?
在会计核算中,凡与价值有关的经济活动,都构成会计要素的内容。 ( )
期货公司变更法定代表人,应当向工商登记机构提交申请材料。( )
某酒店的使命是“为客人提供舒适”,其目标顾客是那些愿意支付高额住宿费用和希望享受一流个人服务的高端旅行者和度假者。该酒店的经营特色包括:周五是孩子们的卡拉OK之夜;周六,全家在私人小屋里吃龙虾,小游客们可以在月夜下露营;酒店一共有365间客房,每间都能看到
(2017年)A公司是一家拥有200多名职工的中型企业。自2015年年底开始,A公司生产经营停滞,无力偿还银行贷款本息,并持续拖欠职工工资。2017年1月,A公司20名职工联名向人民法院提出对A公司的破产申请。人民法院认为该20名职工无破产申请权,作出不予
以下不属于问题界定的主要方法的是()。
以下关于著作权转让的表述中,错误的是(14)。
A、Heusedtohaveproblemsdoingtheassignments.B、Thewomanshouldbecomeatutor.C、Thewomanwon’thavedifficultyinherne
最新回复
(
0
)