首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中有一个命令按钮run1,对应的事件代码如下: Private Sub runl_Enter() Dim num As Integer Dim a As Integer Dim b As Integer Dim
在窗体中有一个命令按钮run1,对应的事件代码如下: Private Sub runl_Enter() Dim num As Integer Dim a As Integer Dim b As Integer Dim
admin
2013-01-07
41
问题
在窗体中有一个命令按钮run1,对应的事件代码如下:
Private Sub runl_Enter()
Dim num As Integer
Dim a As Integer
Dim b As Integer
Dim i As Integer
For i=1 To 10
num=InputBox("请输入数据:","输入",1)
If Int(num/2)=num/2 Then
a=a+1
Else
b=b+1
End If
Next i
MsgBox("运行结果:a="&Str(a)&:",b="&Str(b))
End Sub
运行以上事件所完成的功能是( )。
选项
A、对输入的10个数据求累加和
B、对输入的10个数据求各自的余数,然后再进行累加
C、对输入的10个数据分别统计有几个是整数,有几个是非整数
D、对输入的10个数据分别统计有几个是奇数,有几个是偶数
答案
D
解析
本题考查程序设计的知识。本题的重点在于判断Im(num/2)=num/2语句。对于任意整数来说,若其除2后为整数,也就是Im(num/2)=num/2成立,说明该数是一个偶数;反之,若其除2后不为整数,此时Int(nurn/2)必然不等于num/2,也就是一个整数不可能等于一个小数,说明该数是一个奇数。所以本题的功能是对输入的数据分别统计奇偶数的个数。
转载请注明原文地址:https://kaotiyun.com/show/L3up777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在声明派生类时,如果不显示地给出继承方式,缺省的类继承方式是私有继承private。已知有如下类定义:classTestClass{protected:voidfun(){}};classT
下列关于派生类构造函数和析构函数的说法中,错误的是()。
字符串"8+a=\tb\n\r"的长度为
有下列程序:#includevoidmain(){ints[12]={1,2,3,4,4,3,2,1,1,1,2,3},c[5]={0},i;for(i=0;i<12;i++)c[s[i]]++;for(i=1;i<
有如下程序段:inti=0,j=1;int&r=i;//①r=j;//②int*p=&i;//③*p=&r;//④其中会产生编译错误的
将测试数据传送给被测试的模块,并显示被测试模块所产生的结果是()的作用。
对于一个类定义,下列叙述中错误的是()。
在黑盒测试方法中,设计测试用例的主要根据是( )。
下面描述中,不属于软件危机表现的是( )。
下面关于算法的叙述中,正确的是()。
随机试题
大量耳漏带臭味,鼓膜大穿孔,可见鼓岬裸露的白色骨质,耳漏细菌培养为溶血性链球菌感染。多见于
患者孕2月余,阴道出血逐渐增多,腹痛逐渐加重,并有胎块排出。可诊为
根据《建设工程设计合同(示范文本)》,关于设计费的说法,正确的是()。
上市公司并购重组项目的财务顾问主办人发生变化的,财务顾问应当在()个工作日内向中国证监会报告。
依法行政是指行政机关应当依据法律规定,在法定权限内,按照法定程序作出证据确凿充分的行为。根据上述定义,下列行为符合依法行政要求的是()。
一般保证人与债权人未约定保证期间的,保证期间为()
AnewbookbyaformerlawyeratKirkland&Ellis,oneofthenation’slargestlawfirms,hasdeliveredathrilltothealready
以下TCP/IP中,哪个是应用层协议?
假定有如下语句:answers=MsgBox(“String1”,“String2”,“String3”,2)执行该语句后,将显示一个信息框,单击其中的“确定”按钮,则answers的值为
Intoday’sjobmarketplace,youcanexpecttheinterviewtobea"structured"event—eachcandidatewillbeaskedthesameprede
最新回复
(
0
)