首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有一个命令按钮“Commandl”和一个文本框“Textl”,编写如下程序: Function result(x As Integer)As Boolean If【 】Then result=True Else
窗体中有一个命令按钮“Commandl”和一个文本框“Textl”,编写如下程序: Function result(x As Integer)As Boolean If【 】Then result=True Else
admin
2019-08-21
52
问题
窗体中有一个命令按钮“Commandl”和一个文本框“Textl”,编写如下程序:
Function result(x As Integer)As Boolean
If【 】Then
result=True
Else
resu]t=False
End If
End Function
Private Sub Commandl_Click()
x=Val(InputBox(”请输入一个整数”))
If Not result(x)Then
Textl=Str(x)&”是奇数.”
Else
Textl=Str(x)&”是偶数.”
End If
End Sub
程序运行后单击命令按钮,在输入对话框中输入121,则“Textl”中显示“121是奇数”。
那么程序的【 】处应填写
选项
A、x Mod 2=1
B、x Mod 2==l
C、x Mod 2==0
D、X Mod 2=0
答案
D
解析
result函数返回的是布尔值:true或false,根据主调过程Commandl—Click中条件判断语句:
If Not result(x)Then
Textl=Str(x)&”是奇数.”
Else
Textl=Str(x)&”是偶数.”
EndIf
可知,当“result(x)”返回值是true时,显示“是偶数”;当“result(x)”返回值是false时,显示“是奇数”,所以程序中的【】处,应该是判断变量“x”的奇偶性,如果是偶数,则返回“true”,否则返回“false”,故本题应该填入语句“x Mod 2=0”。故选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/5u0p777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有两个关系R和T如下:则由关系R得到关系T的操作是
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
在VBA中,引用窗体与报表对象的格式是
在基于"学生表"的报表中按"班级"分组,并设置一个文本框控件,控件来源属性设置为"=count(*)",关于该文本框说法中,正确的是
下列程序的输出结果是PrivateSubCommand3_Click()t=0m=1sum=0Dot=t+msum=sum+tm
数据库中有"商品"表如下:执行SQL命令:SELECT*FROM商品WHERE 单价BETWEEN3000AND10000;查询结果的记录数是( )。
Access数据库最基础的对象是( )。
下面对对象概念描述正确的是
下图所示的是报表设计视图,由此可判断该报表的分组字段是( )。
某二叉树中共有935个结点,其中叶子结点有435个,则该二叉树中度为2的结点个数为
随机试题
患者,男性,57岁。右下3左下3缺失,右下67左下67邻合间隙较大。选择右下4左下4做基牙,右下4三臂卡,左下4隙卡。此时义齿最容易出现的不稳定现象是
采用非匀速进展横道图比较法比较工作实际进度与计划进度时,涂黑粗线的长度表示该工作的()。
四川的()以其独特的摩梭风情和秀丽的山水风光闻名于世。
用差速离心法分离出某动物细胞的甲、乙、丙三种细胞器,测定其中三种有机物的含量,如图1所示。下列有关叙述正确的是()。
某公司要招聘一位负责市场开发的管理人员,应征者络绎不绝。第一轮面试时,总经理对所有应聘者说:“请你们哪位帮个小忙,到楼下搬五张桌子和十把椅子来。”有的应聘者对此毫无反应,抓紧时间埋头看公司有关招聘资料。有几位应聘者立刻转身下楼,有的独自扛来一张桌子,有的独
根据《党政机关公文处理工作条例》的相关规定,联合行文时,成文日期为()。
(05年)极限=_______.
Whatdoesthemanmean?
Thelessthesurfaceofthegroundyieldstotheweightofafully-loadedtruck,______tothetruck.
Seeingthehighscore,alltheteacherwonder______(她是如何在一学期内取得这么大的进步的).
最新回复
(
0
)