首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有命令按钮Command1和文本框Text1,事件过程如下: Function result( ByVal x As Integer) As Boolean If x Mod 2=0 Then result=True Else
窗体中有命令按钮Command1和文本框Text1,事件过程如下: Function result( ByVal x As Integer) As Boolean If x Mod 2=0 Then result=True Else
admin
2018-06-11
62
问题
窗体中有命令按钮Command1和文本框Text1,事件过程如下:
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 Command1_Click()
x= Val(InputBox("请输入一个整数"))
If【】Then
Text1=Str(x)&"是偶数."
Else
Text1=Str(x)&"是奇数."
End If
End Sub
运行程序,单击命令按钮,输入19,在Text1中会显示“19是奇数”。那么在程序的括号内应填写( )。
选项
A、NOT result(x)
B、result(x)
C、result(x)=”奇数”
D、result(x)=”偶数”
答案
B
解析
本题程序是判断奇偶性的程序,函数Result用来判断x是否是偶数,如果x是偶数,那么Result的返回值为真,否则返回值为假,单击命令按钮时执行的过程是输入整数x,然后调用Result函数,如果值为真,文本框会显示输入的值是偶数,否则显示输入的值为奇数。调用Result函数且Result函数值为真时的表达式为:Result(x)。故选择B选项。
转载请注明原文地址:https://www.kaotiyun.com/show/oJMp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
窗体有三种视图,分别为“设计视图”、“数据表视图”和“______”。
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:PublicxAsIntegerPrivateSubCommand1_Click()x=10Cal
下列叙述中正确的是()。
定义______有利于对数据库中宏对象的管理。
在窗体中使用一个文本框(名为n)接受输入的值,有一个命令按钮run,事件代码如下:PrivateSubrun_Click()result=""Fori=lToMe!n
【】是关系数据语言的标准语言。
VBA中去除前后空格的函数是______。
如果在数据库中已有同名的表,下列哪一项查询将覆盖原有的表()。
数据库设计包括两个方面的设计内容,它们是______。
使用Access按用户的应用需求设计的结构合理、使用方便、高效的数据库和配套的应用程序系统,属于一种______。
随机试题
被收购的壳公司由于具有挂牌融资的资格和价值而继续存在,由境外公司享有的是()
哺乳类动物体内氨的主要代谢去路()
下列各项,不属现病史问诊内容的是
对于房地产投资项目这样一个特定的经济系统而言,投入的资金、花费的成本和获取的收益,都可看成是物质形式体现的资金流出或资金流入。()
随着人口的不断增加,经济的快速发展,水利基础建设还不能很好地适应国民经济和社会发展的需要,主要表现在()。
【背景资料】A公司承建某地下水池工程,为现浇钢筋混凝土结构。混凝土设计强度为C35,抗渗等级为P8。水池结构内设有三道钢筋混凝土隔墙,顶板,上设置有通气孔及入孔,水池结构如图5-1、5-2所示。A公司项目部将场区内降水工程分包给B公司
自营贷款、委托贷款的风险均由银行承担。()
在高中化学教学中,根据某元素在元素周期表中的位置,既可以解释又可以表示元素及其化合物的化学性质。这说明了元素周期表的本质是()。
材料:张明从师范大学毕业后,成了一名初中数学老师,并担任了班主任一职。作为一名新教师,张明常常向有经验的老教师请教教学上的问题,利用课余时间锻炼自己的课堂表现力,还自学了心理健康知识为班主任工作做准备。他坚信,只有不断地学习才能成为一名好教师。
八股是古代的一种文体,在封建时代用于科举考试。它必须“代圣人立言”,在形式上也必须遵守一些死板的__。1905年,清朝政府宣布废止科举考试制度,八股文随之失去它的实际效用;新文化运动兴起时,它作为封建旧文化的象征之一,受到严厉__;随着时间的推移,自然成了
最新回复
(
0
)