首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个执行命令按钮(名为Commandl),两个文本框Texto和Text1。 命令按钮的Click事件程序如下: Private Sub Commando_Click() x= Val(Me! Text1) If【
在窗体上有一个执行命令按钮(名为Commandl),两个文本框Texto和Text1。 命令按钮的Click事件程序如下: Private Sub Commando_Click() x= Val(Me! Text1) If【
admin
2020-11-25
29
问题
在窗体上有一个执行命令按钮(名为Commandl),两个文本框Texto和Text1。
命令按钮的Click事件程序如下:
Private Sub Commando_Click()
x= Val(Me! Text1)
If【】Then
Texto=Str(x)&"是奇数."
Else
Texto=Str(x)&"是偶数,"
End If
End Sub
Function result( ByVal x As Integer) As Boolean
result =False
If x Mod 2=0 Then
result =True
End If
End Function
程序运行时,在Text1中输入21,单击命令按钮后Texto中显示“21是奇数”。则程序【】处应填写的语句是( )。
选项
A、result(x)=”奇数”
B、result(x)=”偶数”
C、result(x)
D、Not result(x)
答案
D
解析
函数result的功能是判断一个数的奇偶性,如果是偶数,则返回True,否则返回False。在主调过程CommandO_Click()中,使用If判断Texto中输入值的奇偶性,当If表达式为True时,返回“是奇数”,否则返回“是偶数”,因此在If后的空缺条件表达式处,应填入调用函数result的语句,如果返回的值为True,则为奇数;如果返回的值为False,则为偶数,所以应填人的语句为“not re—sult(x)”,故本题D选项正确。
转载请注明原文地址:https://jikaoti.com/ti/18C0FFFM
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个数据库文件“samp2.accdb”,里面已经设计好表对象“档案表”和“水费”。请按以下要求完成设计。(1)设置“档案表”表中的“性别”字段的有效性规则为其值只能为“男”或“女”,有效性文本为“性别字段只能填写男或女”。(2)创建
定义学生、教师和课程的关系模式S(S#,Sn,Sd,Dc,SA)(其属性分别为学号、姓名、所在系、所在系的系主任、年龄);C:(C#,Cn,P#)(其属性分别为课程号、课程名、先修课);SC:(S#,C#G)(其属性分别为学号、课程号和成绩),则该关系为(
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是
Access数据库中,用于输入或编辑字段数据的交互控件是
要求主表中没有相关记录时就不能将记录添加到相关表中,则应该在表关系中设置()。
两个关系在没有公共属性时,其自然连接操作表现为()。
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面属于开发阶段任务的是
要从数据库中删除一个表,应该使用的SQL语句是
下面属于软件工程三要素的是
结构化程序的三种基本结构是
随机试题
Timeisthebiggestproblemofmoststudents.Itbecomesparticularlydifficultwhenyouhavetodolibraryresearchforaterm
双肺出现吸气相高调爆裂音见于
关于民事诉讼审判程序的说法,正确的是()。
根据《支付结算办法》的规定,下列各项中,符合支付结算基本要求的有()。
()是德育实践经验的概括和总结。
从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性:
为支持“一带一路”建设,某公司派出甲、乙两队工程人员出国参与一个高铁建设项目。如果由甲队单独施工,200天可完成该项目;如果由乙队单独施工,则需要300天。甲、乙两队共同施工60天后,甲队被临时调离,由乙队单独完成剩余任务,则完成该项目共需(
下列作品中不属于“元曲四大家”作品的是()。
ImpulseRecruitmentSolutionsTrainingProgramImpulseRecruitmentSolutionswouldliketobringyourattentiontothefantastic
Welearnfromthepassagethat
最新回复
(
0
)