首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有一个命令按钮“Command1”和一个文本框“Text1”,编写如下程序: Function result(x As Integer) As Boolean If【】Then result=True Else result=
窗体中有一个命令按钮“Command1”和一个文本框“Text1”,编写如下程序: Function result(x As Integer) As Boolean If【】Then result=True Else result=
admin
2018-06-11
65
问题
窗体中有一个命令按钮“Command1”和一个文本框“Text1”,编写如下程序:
Function result(x As Integer) As Boolean
If【】Then
result=True
Else
result=False
End If
End Function
Private Sub Command1_Click()
x= Val(lnputBox("请输入一个整数"))
If Not result(x) Then
Text1=Str(x)&"是奇数."
Else
Text1=Str(x)&"是偶数."
End If
End Sub
程序运行后单击命令按钮,在输入对话框中输入121,则“Text1”中显示“121是奇数”。
那么程序的【】处应填写( )。
选项
A、x Mod 2=1
B、x Mod 2==1
C、x Mod 2==0
D、x Mod 2=0
答案
D
解析
result函数返回的是布尔值:true或false,根据主调过程Command1_Click中条件判断语句:If Not result(x) ThenText1=Str(x)&"是奇数."ElseText1=Str(x)&"是偶数."Endlf可知,当“result(x)”返回值是true时,显示“是偶数”;当“result(x)”返回值是false时,显示“是奇数”,所以程序中的【】处,应该是判断变量“x”的奇偶性,如果是偶数,则返回“true”,否则返回“false”,故本题应该填入语句“x Mod 2=0”。故选择D选项。
转载请注明原文地址:https://www.kaotiyun.com/show/sJMp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
查看报表输出效果可以使用()命令。
下列叙述中正确的是()。
定义______有利于对数据库中宏对象的管理。
能够实现从指定记录集里检索特定字段值的函数是
在Access中已建立了“学生”表,表中有学号、姓名、性别和入学成绩等字段。执行如下SQL语句后的结果是()Select性别,avg(入学成绩)From学生GroupBy性别
数据库管理系统DBMS中用来定义模式、内模式和外模式的语言为______。
有一个VBA计算程序的功能如下:该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4,3个按钮分别为:清除(名为C1)、计算(名为C2)和退出(名为C3)。窗体打开运行后,单击“清除”按钮,则清除
有关字段属性,以卜叙述错误的是______。
下列叙述中错误的是()。
VBA中用实际参数a和b调用有参过程Area(m,n)的正确形式是()。
随机试题
支持过程的驱动是()
一平面简谐波的波动方程为y=0.1cos(3πt—πx+π)(SI),t=0时的波形曲线如图所示,则下列叙述中哪个正确?
Partnering模式与其他模式相互关系的比较,Partnering模式相互关系的特点有()。
[背景资料]某新建图书馆工程,采用公开招标的方式,确定某施工单位中标,双方按《建设工程施工合同(示范文本)》(GF—2013—0201)签订了施工总承包合同。合同约定总造价14250万元,预付备料款2800万元,每月底按月支付施工进度款。竣工结算时,结算
主要以国家机构、国有企业和国有控股公司等公有制单位为资金募集对象的证券称为公募证券。( )
利息的产生和利率水平的高低取决于人民对同一等量的商品在现在和将来两个不同的期间内主观评价的差异,这种观点属于()。
企业筹集资金时,属于直接筹资方式的有()。
在2009年出生的1000个孩子中,至少将会有多少个孩子生日相同?
精简机构和人员,是政府机构改革的关键和核心,只有机构和人员精简了,转变政府职能才能到位。
A、Thedoorwillopenwithjustatouchofthefinger.B、Therefrigeratorcanfigureouthowmuchmilktobuy.C、Therobotcando
最新回复
(
0
)