首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim score As Integer score=86 If score>85 Then r=1 ElseIf score>60Then r=2 Else r=0 End If
编写如下程序: Private Sub Command1_Click() Dim score As Integer score=86 If score>85 Then r=1 ElseIf score>60Then r=2 Else r=0 End If
admin
2020-04-18
65
问题
编写如下程序:
Private Sub Command1_Click()
Dim score As Integer
score=86
If score>85 Then
r=1
ElseIf score>60Then
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://www.kaotiyun.com/show/4dTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于滚动条的叙述中,错误的是
设某二叉树的前序序列与中序序列均为ABCDEFGH,则该二叉树的后序序列为
设数据元素的集合D={1,2,3,4,5},则满足下列关系R的数据结构中为线性结构的是
编写如下程序:PrivateSubCommandl_Click()DimxAsInteger,yAsIntegerx=1:y=1Do
己知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1_Click()DimsumA
设有下面程序代码:OptionBase1PfivateSubCommandl_Click()Dimx(6)a=Array(4,2,5,1,6,3)b=Array(64,24,98
以下能对正实数d的第3位小数四舍五入的表达式是()。
设在窗体上有一个名称为Checkt的复选框数组,并有以下事件过程:PrivateSubCheckl_Click(IndexAsInteger)EndSub则下面叙述中错误的是
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePersonNameAsString*8:MajorAsStri8
如果要将一个窗体从内存中清除,应使用的语句是
随机试题
AfterreadinganarticleintheHeraldaboutmemorylossanddementia,Icanassurereadersthattoday’sgenerationhasbeeninf
DNA聚合酶Ⅲ催化的反应
某新建建设项目的基础数据如下:(1)项目建设期2年,运营期10年,建设投资3600万元,预计全部形成固定资产。(2)项目建设投资来源为自有资金和贷款,贷款总额为2000万元,贷款年利率6%(按年计息),贷款合同约定运营期第1年按照项目的最大偿还能力还款
将资产保管同资产会计记录的掌管相分离,可以降低盗窃的风险,因为盗窃者将无法通过减少资产的记录来掩饰盗窃现象。()
下列不属于确定权重的方法是()。
孙老师在任教的两个平行班开展教育研究,检验“阅读名著是否能够提高学生写作水平”的假设。一班学生每周进行3小时名著阅读,二班学生不阅读,一学期结束后,通过写作测试两班学生作文水平。孙老师采用的研究方法是()。
相比于去年下半年开始的由携程和艺龙领头的_____的价格战,旅游点评类网站的发展则并没有进入大众视野,始终在小圈子中_______地发展。如果以全球最大的旅游点评网站TripAdvisor为________,旅游点评网站应该颇具“钱景”。填入画横
2
Thetranslatormusthaveanexcellent,up-to-dateknowledgeofhis【B1】______languages,flailfacilityinthehandlingofhist
Ofallthegoalsoftheeducationreformmovement,noneismoredifficultthandevelopinganobjectivemethodtoassessteachers
最新回复
(
0
)