首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
2015-08-28
61
问题
窗体上有一个名称为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/veQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:PrivatesubForm_Click()Open“d:\test\smtextl.txt”ForInputAs
设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框PrivateSubCommand1_Click()CDl.DialogTitle=“打开文件”CDl.InitDir=“C:\”CDl.Filter=“所有文件
下面是求最大公约数的函数的首部Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
下面关于标准模块的叙述中错误的是
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序的控件已经设置完毕,要求考生去掉程序中的注释符“’”,把“?”改为正确的内容,以完成下面所描述的功能,存盘时不得改变文件名和文件夹。在窗体上有一个名为Listl的列表框,列表框
在考生文件夹下提供了一个通用过程,可供考生直接调用。请在窗体上绘制一个名称为Textl的文本框,绘制一个名称为C1、标题为“计算”的命令按钮和两个名称分别为0p1和Op2、标题分别为“求200~300之间能被7整除的数之和”和“求200~300之间能被3整
符号%是声明______类型变量的类型定义符。
设有以下循环结构;Do循环体LoopWhile<杂件>则以下叙述中错误的是______。
设有语句Open"c:\Test.Dat"ForOutputAs#1则以下错误的叙述是______。
某二叉树中度为2的结点有18个,则该二叉树中有【】个叶子结点。
随机试题
A.浸润型肺结核B.血行播散型肺结核C.原发型肺结核D.慢性纤维空洞型肺结核E.支气管结核下列肺结核的类型划分应是:男性,30岁。因发热、咳嗽2周就诊,胸透为右上肺炎,抗生素治疗已2周无效。昨起少量咯血
职权指的是()。
背景某机电安装公司承担了某钢厂冷轧薄板连续退火炉工程的施工总承包任务。工程内容包括:冷轧薄板连续退火炉本体及附属设备、工艺管道安装;退火炉钢结构厂房建造安装;厂外燃气、原料系统管道安装施工。合同规定,项目的质量目标为获得国家安装
()是一种将贷款本金分段偿还,根据资金的实际占用时间计算利息的还款方式。
广义的贷款法律关系包括()。
下列对因工致残职工劳动关系的处理中,不符合法律规定的是()。
由数据结构、关系操作集合和完整性约束三部分组成了()。
根据国务院印发的《“十三五”控制温室气体排放工作方案》,下列哪些是其中提到的“十三五”控制温室气体排放的重点任务?①低碳引领能源革命②推动城镇化低碳发展③强化基础能力支撑④建设和运行全国碳排放权交易市场⑤加强地区监控
Thelivelihoodofeachspeciesinthevastandintricateassemblageoflivingthingsdependsontheexistencesofotherorganism
AIDSThediseaseAIDShasbecometheleadingcauseofdeathamongyoungadultsinAmerica.MuchrecentAmericanculturedeal
最新回复
(
0
)