首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体中有命令按钮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
2020-06-25
16
问题
窗体中有命令按钮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/DGcp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在Access的数据表中删除一条记录,被删除的记录
在下列关于宏和模块的叙述中,正确的是
在SQL查询中“GROUPBY”的含义是
在考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对象“tStud”“tCourse”“tScore”和“tTemp”。试按以下要求完成设计:(1)创建一个查询,当运行该查询时,应显示参数提示信息“请输入爱好”,输入爱好
要改变窗体上文本框控件的数据源,应设置的属性是
下列各排序法中,最坏情况下时间复杂度最小的是
在显示查询结果时,如果要将数据表中的“籍贯”字段名,显示为“出生地”,可在查询设计视图中改动
下列选项中,不是面向对象主要特征的是
对数据表进行筛选操作,结果是
下列过程的功能是:通过对象变量返回当前窗体的Recordset属性记录集引用,消息框中输出记录集的记录(即窗体记录源)个数。SubGetRecNum()DimrsAsObjectSetrs=Me.RecordsetM8gBox__En
随机试题
(1)TheWestlifestoryreallybeganwaybackinDecember1996whenthethreeoriginalmembersofWestlifewereperforminginal
Theywere______intheirscientificresearch,notknowingwhathappenedjustoutsidetheirlab.
浸润麻醉全麻
2011年某软件生产企业发放的合理工资总额200万元;实际发生职工福利费用35万元、工会经费3.5万元、职工教育经费8万元(其中职工培训经费4万元);另为职工支付补充养老保险12万元、补充医疗保险8万元。2011年企业申报所得税时就上述费用应调增应税所得额
人力资源的策略应当尽量()社会刻板印象的形成。
根据公司法律制度的规定,下列关于一人有限责任公司的表述中,正确的是()。
对资本主义工商业进行社会主义改造实行的和平赎买政策,其目的是要把民族资本主义工商业改造成为社会主义性质的企业。对民族资产阶级实行和平赎买政策的原因是()
求曲线x3-3xy+y3=3上纵坐标最大和最小的点.
设f(x)在区间[a,b]上二阶连续可导,证明:存在ξ∈(a,b),使得
Perhapsmostimportant,thereportcould______morelight,thoughitdoesgivesome,onhowchildwelfareischangingovertime.
最新回复
(
0
)