首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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-06-30
89
问题
窗体上有一个名称为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/K9Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是()。
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger) f=1 Fori=1Toxf=f*i Next s=fEndFunctionPrivateSubCommand1
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=””strL=Len(xStr)
在标准模块中,将a定义为全局整型变量的语句是
Open语句中以Input方式打开一个顺序文件,以便从该文件读取数据。以下叙述中正确的是()。
能够将组合框Combol中最后一个数据项删除的语句为()。
假定有如下语句:answer$=MsgBox("String1",,"String2","String3",2)执行该语句后,将显示一个信息框,单击其中的"确定"按钮,则answer$的值为( )。
用来设置文字字体是否为粗体的属性是()。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个标签(名称为Lbl1,标题为空白,BorderStyle属性为1,Visible属性为False)、一个文本框(名称为Txt1
随机试题
2017年7月3日上午,某县公安局接到报案,在发达路有两人持刀拦路抢劫行人。县公安局立即组织侦查人员赶赴案发现场,到达时,拦路抢劫的犯罪嫌疑人陈某(22周岁)和王某(18周岁)已被下夜班路过此地的县矿机公司保安人员刘某当场抓获。在未携带搜查证的情况下,侦查
下列关于环境监管失职罪,说法错误的是()
在房屋交易中,根据()的不同,所缴税费有所不同。
二级建造师的执业技术能力包括()。
双代号网络计划的关键路线是()。
国债的特征包括()。
以50为平均数,10为标准差表示的标准分,通常叫()。
秘鲁附近海岸所属的自然带为:
社会主义市场经济体制对经济的宏观调控,在目标模式的转变上体现在
A、Hewillbeawayonbusiness.B、Hewillmeethislawyer.C、Hehasbeenbusywithhispaper.D、Hewillpayavisittohisparent
最新回复
(
0
)