首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim score As Integer score = 86 If score > 85 Then r = 1 ElseIf score >
编写如下程序: Private Sub Command1_Click() Dim score As Integer score = 86 If score > 85 Then r = 1 ElseIf score >
admin
2020-07-22
42
问题
编写如下程序:
Private Sub Command1_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
End Sub
程序运行后,单击命令按钮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/3fHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序代码:DimxAsIntegerPrivateSubMySub()StaticxAsIntegerDimyAsIntegerx=x+10
在窗体上有一个名称为Commandl的命令按钮,并编写有如下事件过程:PrivateSubCommandl_Click()DimrecAsanimalOpen”c:\vbTest.dat”F
以下关于VB文件的叙述中,正确的是
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。程序功能如下:(1)考生文件
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示"打开"对话框时,希望在该对话框的"文件类型"栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为( )。
关于随机文件,以下叙述中错误的是( )。
从键盘上输入一个浮点数asingle,利用字符串函数对该数进行处理后,如果输出的内容不是“非浮点数”,则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数:")str1$=Str$(asing
在窗体上画一个文本框,其名称为Text1,为了在程序运行后隐藏该文本框,应使用的语句为( )。
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有三个标签、三个文本框和两个命令按钮,均使用默认名称。程序的功能是:①如果单击“读数据”命令按钮,则把考生文件夹下in5.dat文件中两组己按升序方式排列的数(每组30个数)分别读入数组A和B
随机试题
在药品贮存中,哌替啶应存放于
不能补充血糖的生化过程是
半夏泻心汤所治心下痞是由何因所致
所谓(),是指根据进度计划安排,在某一确定时间内所应完成的工程内容的计划投资。
在下列质量事故中,发生()时,省级交通运输主管部门应在接报2小时内进一步核实,并按规定上报。
_____被公认为第一本现代教育学著作,书中赫尔巴特强调必须有“一种教育者自身所需要的科学,有科学与思考力”并与相邻学科取长补短。【】
举例说明如何运用代币奖励法改变儿童的不良行为习惯。
预防未成年人犯罪的目的是增强未成年人的学习观念。()
文艺复兴运动实质上是一次()的文化革命。
[*]
最新回复
(
0
)