首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
20
问题
编写如下程序:
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全国计算机二级
相关试题推荐
(1)考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。要
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在Form1的窗体上画一个名称为Text1的文本框,然后建立一个主菜单,标题为“操作”,名称为Op,该菜单有两个子菜单,其标题分别为“显示”和“清除”,名称分别
考生文件夹下的工程文件sjt5.vbp中有一个初始内容为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请画一个标题为“各行最小数的平均值为”的标签Label2,再画一个初始内容为空的文本框Text2,如图1-230所示。程序功能如下
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画两个文本框,其名称分别为Text1和Text2,内容分别为“文本框1”和“文本框2”,编写适当的事件过程。程序运行后,如果单击窗体,则
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读入数据”、“计算并输出”和“存盘”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars属性设置为2)(如图1-267所示)。程序运行
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为cmdOpen、标题为“打开”的命令按钮,然后画一个名称为cdlOpen的通用对话框(如图1-242所示),编写适当的事件
结构化程序设计的基本原则不包括( )。
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
在E-R图中,用来表示实体的图形是
随机试题
What’sWrongwithOurTeaching?Testinghasreplacedteachinginmostpublicschools.Myownchildren’sschoolweekisfoc
以下不属于Word2010缩进效果的是____________。
A.thatwouldbeniceB.it’stimeformetoseemyfriendsC.WhatcandoforyouD.ThanksforcomingsoquicklyE.
短时记忆的持续时间是
国家机关应当在国有或者国家控股的银行开立账户,不得在其他银行或非银行金融机构开立账户。()
下列关于外铄论的代表人物是()。
护士进行晨问护理的内容包括()。
左边给定的是纸盒的外表面图,下面哪一项不能由它折叠而成?
在时间估计准确性实验中,一只绿色小灯泡与电钟相连,主试按键让灯亮10秒,然后被试按键复制10秒的时间。这个实验中被试复制时间长度是()。
Thebesttitleforthetextmaybe______.WhatdoestheexampleoftheSmallpoxVaccineillustrate?
最新回复
(
0
)