首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有命令按钮Commandl和文本框Text1,事件过程如下: Function result(ByVal x As Integer)As Boolean If x Mod 2=0 Then result=True El
窗体中有命令按钮Commandl和文本框Text1,事件过程如下: Function result(ByVal x As Integer)As Boolean If x Mod 2=0 Then result=True El
admin
2020-07-25
33
问题
窗体中有命令按钮Commandl和文本框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 Commandl_Click()
x=Val(InputBox(”请输入一个整数”))
lf【】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)。
转载请注明原文地址:https://kaotiyun.com/show/LCcp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
利用Access创建的数据库文件,其扩展名为
VBA语句“DimNewArray(10)asInteger”的含义是
在窗体中有一个标签Lbl和一个命令按钮Commandl,事件代码如下:OptionCompareDatabaseDimaAsString*10PrivateSubCommandl_Click()a=”
在学生表中使用“照片”字段存放相片,当使用向导为该表创建窗体时,照片字段使用的默认控件是
设一棵树的度为3,其中度为3,2,1的结点个数分别为4,1,3。则该棵树中的叶子结点数为
运行下列程序,输入数据8、9、3、0后,窗体中显示结果是PrivateSubForm_click()DimsumAsInteger,mAsIntegersum=0Dom=InputBox(”输
学院的每名教师只能属于一个系,则实体系和实体教师间的联系是
在带链栈中,经过一系列正常的操作后,如果top=bottom,则栈中的元素个数为
考生文件夹下存在一个数据库文件“samp1.accdb”,里面已经设计好表对象“tEmployee”。试按以下要求,完成表的编辑:使用查阅向导建立“职务”字段的数据类型,向该字段键入的值为“职员”、“主管”或“经理”等固定常数。
如果字段“考查成绩”的取值范围为大写字母A~E,则下列选项中,错误的有效性规则是
随机试题
下列期限中属司法机关应当遵守的是
关于点滴状副银屑病下列正确的是
β-Gal的常用底物是
一容器中装有质量为0.14kg,压强为2.0265×106Pa,温度为127℃的氮气。可知这容器的体积V为()。
()是短期投资的一项策略。
证券发行规模达到一定数量的可以采用联合保荐,但参与联合保荐的保荐机构不超过()家。
涉及旅游者人身安全的事故均为旅游安全事故。()
文艺复兴时期,人文主义教育具有鲜明的人本取向,这种特征主要表现为()。(2016年)
(2008年多选51)下列选项中,属于立法活动的有()。
GermanhavelawmakersvotedtoextendandexpandtheroleofGermanpeacekeepersin________.
最新回复
(
0
)