首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Commandl—Click() Dim a As Integer,b As Integer a=3 b=2 If a*b<10 Then b=b+1 Else b=b— l Print b—a>0 End Sub
编写如下程序: Private Sub Commandl—Click() Dim a As Integer,b As Integer a=3 b=2 If a*b<10 Then b=b+1 Else b=b— l Print b—a>0 End Sub
admin
2020-01-02
36
问题
编写如下程序:
Private Sub Commandl—Click()
Dim a As Integer,b As Integer
a=3
b=2
If a*b<10 Then b=b+1 Else b=b—
l
Print b—a>0
End Sub
程序运行后,单击命令按钮Command1,输出结果为( )。
选项
A、True
B、False
C、1
D、一1
答案
B
解析
If…Else语句对b进行操作。a*b=6,<10,所以执行b=b+1=3。Print语句中,b—a=0,条件为假。选B)。
转载请注明原文地址:https://kaotiyun.com/show/RETp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序代码:PrivateSubForm_Click()DimxAsInteger,yAsInteger,numAsIntegerx=3y=xDoUntilx>=6num
在窗体上画一个名称为Dir1的目录列表框,一个名称为Filel的文件列表框。当改变当前目录时,文件列表框中同步显示目录列表框中当前被打开目录中的文件,则所使用的事件过程是()。
若在窗体模块的声明部分声明了如下自定义类型和数组:PrivateTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Asrec则
(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图3.82所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。
(1)在名称为Form1的窗体上添加一个计时器控件,名称为Timerl。请利用属性窗口设置适当属性,使得在运行时可以每隔1秒,调用计时器的Timer事件过程一次。另外,请把窗体的标题设置为“题目2”。设计阶段的窗体如图3.73所示。(2)在名称为
下面定义窗体级变量a的语句中错误的是
设在一个工程的窗体中有如下代码:PubllcxAsIntegerPrivateSubForm_Load()DimyAsIntegerEndSub在该工程的标准模块的声明部分有代码:PublicaAsInteger:
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
随机试题
Thetruthisbecoming______(increase)apparent.
A.藿香正气散B.不换金正气散C.葛根芩连汤D.白头翁汤E.芍药汤患者泄泻腹痛,泻下急迫,粪色黄褐,气味臭秽,肛门灼热,烦热口渴,舌质红,苔黄腻,脉滑数。治疗应首选()
高性能混凝土宜选用标准稠度用水量()的硅酸盐水泥、复合硅酸盐水泥。
社区工作的具体目标有()。
研究性学习
马某在公交车上盗窃财物,窃得一女士提包,打开一看,里面没有钱,却有手枪一把,马某随后把此枪藏于家中。对此,下列说法正确的是()。
IntheUS,aperson’scompanybuyshimorherhealthinsurance.AllemployeesintheUShavethesamekindofhealthinsurance.
A、Morethan1,000peopletookpartinthestudy.B、Peoplewhosleptlesshadhigherbloodlevelsofghrelin.C、Peoplewhoslept
Itwaseleveno’clockthatnightwhenMr.PontellierreturnedfromKlein’shotel.Hewasinanexcellenthumor,inhighspirits,
JustTooLoudTedRueterisn’tjokingaboutpossiblymovingtoNewZealand.Andifhedoesgo,itwon’tbetherageorthee
最新回复
(
0
)