首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有命令按钮Commandl和文本框Textl,事件过程如下: Function result(ByVal x As Integer)As Boolean If X Mod 2=0 Then result=True El
窗体中有命令按钮Commandl和文本框Textl,事件过程如下: Function result(ByVal x As Integer)As Boolean If X Mod 2=0 Then result=True El
admin
2019-08-21
37
问题
窗体中有命令按钮Commandl和文本框Textl,事件过程如下:
Function result(ByVal x As Integer)As Boolean
If X Mod 2=0 Then
result=True
Else
result=False
End If
End Function
Private Sub Commandl_Click()
x=Val(1nputBox(”请输入一个整数”))
If【 】Then
Textl=Str(X)&”是偶数.”
Else
Textl=Str(x)&”是奇数.”
End If
End Sub
运行程序,单击命令按钮,输入19,在Textl中会显示“19是奇数”。那么在程序的括号内应填写 ( )。
选项
A、NOT result(x)
B、result(x)
C、result(x)=”奇数”
D、result(x)=”偶数”
答案
B
解析
本题程序是判断奇偶性的程序,函数Result用来判断x是否是偶数,如果x是偶数,那么ResuIt的返回值为真,否则返回值为假,单击命令按钮时执行的过程是输入整数x,然后调用Result函数,如果值为真,文本框会显示输入的值是偶数,否则显示输入的值为奇数。调用Result函数且Result函数值为真时的表达式为:Result(X)。故选择B选项。
转载请注明原文地址:https://jikaoti.com/ti/Pwo0FFFM
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
如果字段"定期存款期限"的取值范围为1~5,则下列选项中,错误的有效性规则是
在学生借书数据库中,已有"学生"表和"借阅"表,其中"学生"表含有"学号"、"姓名"等信息,"借阅"表含有"借阅编号"、"学号"等信息。若要找出没有借过书的学生记录,并显示其"学号"和"姓名",则正确的查询设计是( )。
设循环队列为Q(1:m),其初始状态为front=rear=m。经过一系列入队与退队运算后,front=30,rear=10。现要在该循环队列中作顺序查找,最坏情况下需要比较的次数为
若表中已经有字段"终止日期"和"起始日期",在查询设计视图中的字段栏中要添加一个用于显示的字段"时间长度",则应在字段栏中填写的表达式是
设循环队列为Q(1:m),其初始状态为front=rear=m。经过一系列入队与退队运算后,front=30,rear=10。现要在该循环队列中作顺序查找,最坏情况下需要比较的次数为
在数据表的"查找"操作中,通配符"[!]"的使用方法是( )。
若在设计视图中创建一个查询,查找平均分在85分以上的女生,并显示姓名、性别和平均分,正确的设置查询条件的方法是
在Access中有雇员表,其中有存照片的字段,在使用向导为该表创建窗体时,"照片"字段所使用的默认控件是
要使窗体上的按钮运行时不可见,需要设置的属性是().
在考生文件夹下,“sampl.accdb”数据库文件中已建立两个表对象(名为“员工表”和“部门表”)。试按以下要求,完成表的各种操作:(1)设置表对象“员工表”的聘用时间字段有效性规则为:1950年(含)以后的日期;同时设置相应有效性文本为“请输
随机试题
求二元函数f(x,y)=x3+8y3-xy的极值.
国际营销战略规划的制定过程包括哪几个步骤?
下列不属于Ⅲ型超敏反应的疾病是
A.老年性白内障B.代谢性白内障C.并发性白内障D.中毒性白内障E.先天性白内障青少年类风湿关节炎合并的晶状体混浊是
丹毒好发于()
()具有可信度高,降低购买者疑心等特点。
期货公司的股东、实际控制人或者其他关联人在期货公司从事期货交易的,期货公司应当自开户之日起()个工作日内向其住所地的中国证监会派出机构备案。
初始保证金率若为50%,券商需要融资( )元。在上题相同的前提下,足额保证金交易的回报率只有( ),保证金交易的引入提高了证券交易的风险。
按照柯尔伯格的理论,个体超越现实道德规范的约束,本着自己的良心从事道德判断的道德发展阶段处于
•Readthearticlebelowaboutresponsibility.•Foreachquestion13-18,markoneletter(A,B,CorD)onyourAnswerSheet,f
最新回复
(
0
)