首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有命令按钮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
58
问题
窗体中有命令按钮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/2uSp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好三个关联表对象“tCourse”“tGrade”“tStudent”和一个空表“tSinfo”,同时还有两个窗体“tStudent”和“tGrade子窗体”,试按以下要求完成设计。
在关系表中,属性值必须是另一个表主键的有效值或空值,这样的属性是
关系数据模型的三个组成部分中不包括
有三个关系R,S和T如下图所示:其中关系T由关系R和S通过运算得到,则该运算是
在关系模式A(S,SN,D)和B(D,CN,NM)中,关系A的主键是S,关系B的主键是D,则属性D在关系A中称为
生产每种产品需要多种零件,则实体产品和零件间的联系是
在已建雇员表中有“工作日期”字段,下图所示的是以此表为数据源创建的“雇员基本信息”窗体。假设当前雇员的工作日期为“1998-08-17”,若在窗体“工作日期”标签右侧文本框控件的“控件来源”属性中输入表达式:=Str(Month([工作日期]))+"月
关系数据模型的三个组成部分中不包括
在“查找和替换”对话框的“查找内容”文本框中,设置“[!a—c]ffect”的含义是()。
随机试题
A、所有药品B、过期药品C、成人药品D、儿童药品E、大部分药物不应让儿童轻易拿到的是
患儿,男,5岁,主诉因上下肢暗红色出血性皮疹5d,伴腹痛、便血、双膝关节肿痛2d入院。尿化验:红细胞++/HP,双下肢皮肤有散在大小不等、暗红色皮疹,双膝关节肿胀、有触痛,腹软,下腹无压痛,无反跳痛。下列护理措施哪项不正确
美曲膦酯口服中毒时,不能用来洗胃的溶液是
根据《合同法》规定,下列行为中不属于要约邀请的是()。
基金市场的服务机构不包括()。
南的趵突泉、大明湖、历下亭合称“济南三胜”。( )
(2009年真题)关于出版社进行著作权贸易谈判时必须注意的事项,下列表述中正确的是()。
Forty-fiveyearsagothisweek,Americanswerealreadygrowingtiredofthemoon.Amonthearlier,onJuly21st,thelandingof
NBCmanagersarelongingtoseehow.theshowfaresinthe______.
A、Toexplainwhyitwasincludedinthelist.B、Todescribewhyheseriouslycrosseditoffthelist.C、Toprovethatheunderst
最新回复
(
0
)