首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中有一个命令按钮Commandl,对应的事件代码如下: Private Sub Command1_Enter() Dim hum As Integer Dim aAs Integer Dim b As Integer
在窗体中有一个命令按钮Commandl,对应的事件代码如下: Private Sub Command1_Enter() Dim hum As Integer Dim aAs Integer Dim b As Integer
admin
2021-07-08
89
问题
在窗体中有一个命令按钮Commandl,对应的事件代码如下:
Private Sub Command1_Enter()
Dim hum As Integer
Dim aAs Integer
Dim b As Integer
Dim iAs Integer
For i=1 To 10
num=InputBox(“请输入数据:”,“输入”,1)
If Int(nurn/2)=nurn/2 Then
a=a+1
Else
b=b+1
EndIf
Next i
MsgBox(“运行结果:a=”&Str(a)&:“,b=”&Str(b))
End Sub
运行以上事件所完成的功能是( )。
选项
A、对输入的10个数据求累加和
B、对输入的10个数据求各自的余数,然后再进行累加
C、对输入的10个数据分别统计有几个是整数,有几个是非整数
D、对输入的10个数据分别统计有几个是奇数,有几个是偶数
答案
D
解析
本题考查程序设计的知识。本题的重点在于判断Int(num/2)=num/2是什么样的条件。对于任意一个整数来说,若其除2后为整数,也就是:Int(num/2)=num/2成立,说明该数是一个偶数;反之若其除2后不为整数,此时Int(num/2)必然不等于num/2,也就是一个整数不可能等于一个小数,说明该数是一个奇数。所以本题的功能是对输入的数据分别统计奇偶数的个数。
转载请注明原文地址:https://kaotiyun.com/show/w2vp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在窗体中有一个命令按钮run1,对应的事件代码如下:PrivateSubrun1Enter()DimnumAsIntegerDimmAsIntergerDimnAsIntegerDimiAsIntegerFori=
下面描述中不属于软件需求分析阶段任务的是
若将已建窗体设置为打开数据库时启动的窗体,应使用的对话框是()。
下列表达式中,能正确表示条件“x和y都是奇数”的是
在数据库管理技术发展的三个阶段中,没有专门的软件对数据进行管理的是
软件生命周期中花费时间最多的阶段是()。
某完全二叉树按层次输出(同一层从左到右)的序列为ABcDEFGH。该完全二叉树的前序序列为()。
执行下列程序段后,变量s的值是DimsAslong,xAsIntegers=0:x=1DoWhile(x<10)s=s+xx=x+2
在“窗体视图”显示该窗体时,要求在单击命令按钮(bChange)后标签(Labell)上显示的文字颜色变为红色,以下能实现该操作的语句是
随机试题
简述社会主义核心价值体系的基本内容。
加碘预防地方性甲状腺肿是早期发现原位癌并加以手术是
A造纸厂与B科技开发公司之间的委托合同是否有效?为什么?本案应如何处理?为什么?
甲公司系一广告公司。在进行企业内部升级改造时。甲公司将淘汰掉的工作电脑以二手市场价出售给乙公司。但甲公司的经营范围内并无出售电脑一项业务,则甲、乙的买卖行为法律效力如何?()
建设工程进度控制的总目标是()。
适中的资产组合策略的特点是()。
材料:王老师是小学三年级的数学教师,在教授“同一平面上两点之间直线最短”时是这样教学的:他先在黑板上取了在同一平面上的两个点,并作出这两点间的四条线段,其中包括两点间的直线。接着,请一位学生把这几条线段的距离测量出来,写在线段旁,再让其他学生说出哪一条最
“十四五”时期是我国在全面建成小康社会基础上开启()社会主义现代化国家新征程的第一个五年,意义十分重大。
根据下列文字回答以下问题:日前,A市市场监管局发布内资企业半年度分析报告。2014年上半年,该市新设内资企业19674户,注册资本(金)1179.4亿元,同比分别增长37.7%和166%。其中私营企业:19167户,注册资本(金)104
Beijing:TheUnitedStatesandNorthKoreahadtheirfirst【C1】______infourmonthsherethisafternoonaspartofthe【C2】______
最新回复
(
0
)