首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
37
问题
编写如下程序:
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全国计算机二级
相关试题推荐
如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是______。
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:DimkAsIntegerPrivateSubForm_Load()k=15EndSubPrivateSubCommand1_C
运行下面的程序后,输出的结果为ClsDimt(5,5)asIntegerFori=1To5:t(i,i)=1:NextFori=1To5Forj=1To5Printt(i,j),Next
在窗体上建立一个含有3个命令按钮的控件数组,当单击某个命令按钮时,分别执行不同的操作。请填写以下空白处,使程序完整。PrivateSubCommand2_Click(IndexAsInteger)FontSize=12
关系数据库管理系统能实现的专门关系运算包括______。
下列关于控件焦点的叙述中正确的是()。
窗体如图l所示。要求程序运行时,在文本框Textl中输入一个姓氏,单击”删除”按钮(名称为Commandl),则可删除列表框Listl中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommandI_Click()D
(1)请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml的窗体上建立一个名称为Commandl的命令按钮数组,含三个命令按钮,它们的Index属性分别为0、1、2,标题依次为”是”、”否”、”取消”,每个按钮
在窗体上画一个文本框,名称为Textl(可显示多行),然后再画三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为”读数”、”统计”和”存盘”,如图2.5所示。程序的其功能是:单击”读数”按钮,则把考生目录下的in5.t
设循环队列为Q(1:m),初始状态为front=rear=m。现经过一系列的入队与退队运算后,front=rear=1,则该循环队列中的元素个数为
随机试题
实验中刺激神经纤维,其动作电位传导的特点是
某公司用现金发放工资80000元,记账后发现记账凭证中应记科目、借贷方向无误,但金额误记为8000元。更正该错误的正确方法是()。
分散投资者风险的票据发行便利属于()。
短期贷款报审材料中,属于借款申请文件的有()。
供给弹性主要有供给的()和供给的要素成本弹性。
下列不符合《行政处罚法》规定的有()。
在中国这一具有深厚权力崇拜传统和社会基础的国家,法律规制的单边突进容易出现法律规制被权力架空,权力压倒法律的现象。因此,法律的落实和推动需要同盟军。而充分允许公众和各级民意代表以及媒体在法律范围内对应该公开的行为和信息自由表达自己的意见,甚至批评和质疑,是
注意事项1.本题本由给定资料与作答要求两部分构成。考试时限为180分钟。其中。阅读给定资料参考时限为50分钟,作答参考时限为130分钟。满分150分。2.监考人员宣布考试开始时,你才可以开始答题。3.请在题本、答题卡指定位置填
科学不是宗教,宗教都主张信仰,所以主张信仰都不科学。以下哪项最能说明上述推理不能成立?
软件的特点是(24)。正因如此,我们应对软件产品的(25)进行大力保护。
最新回复
(
0
)