首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click( ) Dim a As Integer,b As Integer a=3 b=2 If a*b<10 T
编写如下程序: Private Sub Command1_Click( ) Dim a As Integer,b As Integer a=3 b=2 If a*b<10 T
admin
2020-05-11
44
问题
编写如下程序:
Private Sub Command1_Click( )
Dim a As Integer,b As Integer
a=3
b=2
If a*b<10 Then b=b+1 Else b=b-1
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/MEHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画两个标签(名称分别为lblName和lblAge,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为txtName和txtAge,
在考生目录下已有一个工程文件sjt5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。请编写程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和,并将结果存入数组c。单击“找最大值”按钮时,调用find过程分
考生文件夹下的工程文件sjt5.vbp中有一个初始内容为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请画一个标题为“各行最小数的平均值为”的标签Label2,再画一个初始内容为空的文本框Text2,如图1-230所示。程序功能如下
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Chl的复选框数组,含三个复选框,它们的Index属性分别为0、1、2,标题依
考生文件夹下的工程文件sjt5.vbp中有一个初始内容为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请画一个标题为“各行平均数的最大值为”的标签Label2,再画一个初始内容为空的文本框Text2,如图3-106所示。程
窗体上有一个名称为Cbl的组合框,程序运行后,为了输出选中的列表项,应使用的语句是()。
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ACDACD”Functiondelchar(strAsString,chAsStri
设有如下函数:FunctionDelSpace(chAsString)AsInteger Dimn%,st$,c$ st="" n=0 Fork=1ToLen(ch) c=Mid(ch,k,1) I
设有变量声明为”DimaDateAsDate”,则能为变量aDate正确赋值的表达方式是()。
下列选项中不属于软件生命周期开发阶段任务的是()。
随机试题
国际旅游业的特点是_________、_________、_________。
女性病人,50岁,患慢性迁延性肝炎20余年,近一个月来感全身明显乏力,纳差,腹胀,腹泻而入院。入院时查体:T37.8℃,P90次/分,R26次/分,Bp10/8kPa,体重46kg。面色灰暗,体形消瘦,皮肤巩膜轻度黄染,腹部膨隆,叩诊有移动性浊音。经检
药师的职责包括
下列关于乳腺摄影时压迫必要性的描述,错误的是
休克代偿期表现不包括()
中枢作用最强的M胆碱受体拮抗剂药物是()。
上消化道大出血最重要的临床表现是
每个影响期权价值的因素的影响程度可以通过期权价值关于各因素的偏导数来体现,这些偏导数称为希腊字母,其中反应利率变动风险的是()。
纽约市场上年利率为4%,伦敦市场上年利率为2%,即期汇率为GBP1=USD1.2525-35,6个月汇水为30—50点,求:6月期的远期汇率?
A、Lackofmoisture.B、Intensionofradiation.C、Shortageofsleep.D、Misuseofmedicine.A
最新回复
(
0
)