首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i=1 To 500 If p(i)Then s=s+1 Next Pr
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i=1 To 500 If p(i)Then s=s+1 Next Pr
admin
2016-06-23
58
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下:
Private Sub Command1_Click()
Dim i As Integer
For i=1 To 500
If p(i)Then s=s+1
Next
Print s
End Sub
Private Function p(x As Integer)As Boolean
If x Mod 7 <>0 Then
P=True
Else
p=False
End If
End Function
关于上述程序,以下叙述中正确的是
选项
A、程序功能是统计1—500范围内能被7整除的整数个数
B、Command1_Click事件过程中If语句的条件表达式不完整
C、Function过程定义有误,函数过程p的名称与该过程中的变量名p相同
D、函数过程p的返回值为Boolean类型
答案
D
解析
程序功能是统计1—500范围内不能被7整除的整数个数;函数过程p的返回值根据函数定义可知为Boolean类型。选D。
转载请注明原文地址:https://kaotiyun.com/show/IUID777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
国际收支平衡表的四部分主要内容中,最基本的项目是()。
党的十八大提出的“四个监督”的内容是()。
下列关于我国各民族分布的说法,正确的是()。
关于我国的地理环境,下列说法不正确的是()。
某县公安局民警甲在一次治安检查中被乙打伤,公安局认定乙的行为构成妨碍公务,据此对乙处以200元罚款。甲认为该处罚决定过轻。下列哪种说法是正确的?()
毛泽东同志总结中国近代历次运动失败时曾说:“没有农民办不成大事,光有农民办不好大事。”下列事件属于“光有农民办不好大事”的是()。
甲持刀追杀乙,眼见就要被追上时,乙见路旁停有一辆未熄火摩托车,便驾车逃跑,使摩托车遭受严重损毁。乙的行为构成()。
有一个工厂共有大、小两个车间,每个车间各有三分之一的工人是熟练工,已知大、小两个车间人数原本相差90人。如果将两个车间里的熟练工对调,则大、小两个车间的人数比变为8:7。那么这个工厂一共有多少工人?
下图是校园网某台主机在命令行模式执行某个命令时用sniffer捕获的数据包。请根据图中信息回答下列问题。该主机上执行的命令是【20】。
随机试题
用于解救麻醉性镇痛药急性中毒的药物是()
Haveyou【B1】______askedyourselfwhychildrengotoschool?Youwillprobablysaythattheygo【B2】______theirownlanguagea
咯血的常见证候是
患者,女,70岁,反复咳嗽近30年,近一周因发热,咳嗽,咳痰,呼吸困难入院。查体:体温38.8℃,脉率:80次/分,血压140/80mmHg,未见颈静脉充盈,右中下肺叩浊,语音震颤减弱,呼吸音消失,左肺可闻及散在干湿性啰音,心界向左扩大,心律不整,心率10
中国古建筑按照建筑物的用途分类,主要有民居建筑、宫殿建筑、礼制性祭祀建筑、宗教建筑、陵墓建筑、军事防御体系、古典园林以及桥梁建筑等类型。下列属于宗教建筑的有()
公司合并时,合并各方的债权、债务,应当由合并后存续的公司或者新设的公司承继。()
财务报告分析具有()特征。
污名认同,是指一个社群或族群对自己产生负面的认同感,因而竭力排斥自己的母文化及表征,并向另一文化迅速靠拢或同化。根据上述定义,下列不属于污名认同的是:
Aspartofmorecomprehensivecomplianceandethicsprograms,manycompanieshaveformulatedinternalpoliciespertainingtothe
A、SomeofthemarelocatedinLondon.B、TheyarecharacteristicoftheUK.C、TheyareinthesuburboftheUK.D、Theyareledby
最新回复
(
0
)