首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i = 1 To 500 If p(i)
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i = 1 To 500 If p(i)
admin
2020-07-22
27
问题
窗体上有一个名称为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/iHHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
编写如下程序:PrivateSubCommandlClick()DimnumAsInteger,kAsInteger,11AsIntegernum=LnputBox(“请输入一个正整数:”)k=numn=2DoDoWhile
以下关于通用对话框的叙述中,错误的是
下列选项中,不属于模块间耦合的是()。
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=””:strL=Len(xStr)
若在窗体模块的声明部分声明了如下自定义类型和数组PrivateTyperecCodeAsInteger:CaptionAsStringEndTypeDimarr(5)Asrec则下
假定有如下程序:PrivateSubFormClick()Dima(4)AsInteger,b(4)AsIntegerFork=0To2a(k+1)=Val(InputBox("请输入一个整数
以下关于窗体的叙述中错误的是
VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是
对于含有多个窗体的工程而言,以下叙述中正确的是
随机试题
声波时差测井资料主要应用于划分地层、判断气层和确定地层的()。
地图舌患者可能伴有的临床症状是
接触麻疹的易感者应检疫观察多长时间
下列感染中,没有传染性的是
土工合成材料的厚度一般在()压力下测量。
立井井筒施工的掘进段高,由()等因素确定。
可解除保单是( )。
根据以下资料,回答下列问题。2013年3月,人身险的三个险种保费收入环比增速排序正确的是()。
商业银行的负债业务是()
如果x1,x2,x3三个数的算术平均值为5,则x1+2,x2一3,x3+6与8的算术平均值为().
最新回复
(
0
)