首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有命令按钮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
2021-04-27
29
问题
窗体中有命令按钮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)。
转载请注明原文地址:https://kaotiyun.com/show/58Sp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个关联表对象(名为“tStud”、“tCourse”、“tScore”)、一个空表(名为“tTemp”)和一个窗体对象(名为“fTemp”)。试按以下要求完成设计:创建追加查询,
在考生文件夹下有一个数据库文件“samp2.accdb”,里面已经设计好了两个表对象“tNorm”和“tStock”。请按以下要求完成设计。创建一个交叉表查询,统计并显示每种产品不同规格的平均单价,显示时行标题为产品名称,列标题为规格,计算字段为单价,
在考生文件夹下有一个数据库文件“samp2.accdb”,里面已经设计好两个表对象“tA”和“tB”。请按以下要求完成设计。创建一个查询,查找并显示6月份入住客人的“姓名”“房间号”“电话”和“入住日期”四个字段内容,所建查询命名为“qT1”
在考生文件夹下有一个数据库文件“samp2.accdb”,里面已经设计好表对象“档案表”和“水费”。请按以下要求完成设计。创建一个查询,查找水费为零的记录,并显示“姓名”,所建查询命名为“qT3”。
下列叙述中正确的是
对于循环队列,下列叙述中正确的是
设顺序表的长度为40,对该表进行冒泡排序。在最坏情况下需要的比较次数为
在窗体中有一个命令按钮Commandl,编写事件代码如下:PrivateSubCommandI_Click()DimSAsIntegerS=P(1)+P(2)+P(3)+P(4)debug.PrintS
a和b中有且只有一个为0,其正确的表达式是()。
数据流图中带有箭头的线段表示的是()。
随机试题
符合法定条件、标准的,申请人有依法取得行政许可的平等权利,行政机关不得歧视()
对鉴别是否肾小球源性血尿最有意义的是
选择产品定价的特点是()。
气浮过程的必要条件不包括()。
工程网络计划按工作持续时间的特点可划分为( )网络计划。
S有限责任公司系外商投资企业,确定的记账本位币为人民币。20×7年1月2日,S有限责任公司收到外商投入的外币资本400000欧元,当日的即期汇率为:1欧元=10元人民币。中外双方签订的投资合同中约定汇率为:1欧元=9.8元人民币。当月的平均汇率为1欧元=1
“超额贷款损失准备可计入部分”属于商业银行资本中的()。
简述音乐的审美特征
【H1】【H12】
A、TheinaccessibleInternet.B、Theservicequality.C、Theannualincome.D、Therailnetwork.B
最新回复
(
0
)