首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Commandl_Click() Private Function p(x As Integer)As Boolean
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Commandl_Click() Private Function p(x As Integer)As Boolean
admin
2019-06-11
54
问题
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的函数过程如下:
Private Sub Commandl_Click() Private Function p(x As Integer)As Boolean
Dim i As Integer Ifx Mod 7<>0 Then
For i=1 To 500 p=True
Ifp(i)Then s=s+1 Else
Next p=False
Print s End If
End Sub End Function
关于上述程序,以下叙述中正确的是
选项
A、程序功能是统计1-500范围内能被7整除的整数个数
B、Commandl Click事件过程中If语句的条件表达式不完整
C、Function过程定义有误,函数过程P的名称与该过程中的变量名P相同
D、函数过程P的返回值为Boolean类型
答案
D
解析
调用Function过程要返回一个值,因此可以像内部函数一样在表达式中使用。如果在Function过程中省略“过程名=表达式”,则该过程返回一个默认值(数值函数过程返回0值;字符串函数过程返回空字符串)。因此,通常要在过程体中给“过程名”赋值。本题中函数p的返回值为Boolean类型,功能是判断参数x是否能被7整除,如果不能整除返回True,否则返回False。Commandl_Click事件过程中使用了单行的If语句,不需要Else分支和Endlf语句。程序功能是统计1一500范围内不能被7整除的整数个数。
转载请注明原文地址:https://kaotiyun.com/show/pCUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列叙述中正确的是()。
在窗体上域一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:PrirateSubCommand1_Click()a=InputBox("Enteranin
程序调试的任务是()。
假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是()。
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为()。
程序流程图中带有箭头的线段表示的是()。
(1)在名称为Form1的窗体上画一个标题为“直辖市”、名称为:Framel的框架,在框架中画一个名称为Combol的组合框,其编辑域为空,有如图所示的4个列表项,外观风格也与图中相同。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vb
(1)在名称为Form1的窗体上添加一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFFF&)。运行程序后的窗体如图所示。要求:程序中不得使用变量,每个事件过
VisualBasic根据计算机访问文件的方式将文件分成3类,其中不包括()。
数据库系统的三级模式不包括
随机试题
甲状腺腺瘤与结节性甲状腺肿的主要鉴别点是
支气管哮喘的主要特征是
在工程项目策划和决策阶段,项目建议书、可行性研究报告是()的工作成果。
工作或活动间的先后资序,即逻辑关系一般分为()。
在质量控制中,要分析某个质量问题产生的原因,应采用( )法。
背景材料:某高速公路在建设单位、设计单位、施工单位、监理单位的共同努力下,按质按量如期完成工程合同,交工验收两年后,该高速公路工程基本符合竣工验收条件,建设单位向交通主管部门申请竣工验收。问题:公路工程竣工验收有哪些主要工作内容?
关于个人耐用消费品贷款说法正确的有()。
[A]Theroleofnaturalselectioninthiscolorfulworld[B]Thedelicatehierarchyofthenaturalsystem[C]Theagencyofsele
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivmeSubCommandl.Click()DimhumAsInteger,xAsIntegernurfl=Val(InputBox(“请输入一个正整数”))Select
Themostpressingnuclearenergyissueisthedisposalofnuclearwaste.Evenifallthereactorsinexistencewerecompletelys
最新回复
(
0
)