首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command 1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command 1_Click()Dim i As Integer For i=1 To 500 Ifp(i)Then s=s+1 Next Pr
窗体上有一个名称为Command 1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command 1_Click()Dim i As Integer For i=1 To 500 Ifp(i)Then s=s+1 Next Pr
admin
2015-05-29
24
问题
窗体上有一个名称为Command 1的命令按钮,其单击事件过程及相关的函数过程如下:
Private Sub Command 1_Click()Dim i As Integer
For i=1 To 500
Ifp(i)Then s=s+1
Next
Print s
End Sub
Private Function p(x As Integer)As Boolean
Ifx 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
解析
调用Function过程要返回一个值,因此可以像内部函数一样在表达式中使用。如果在Function过程中省略“过程名=表达式”,则该过程返回一个默认值(数值函数过程返回0值:字符串函数过程返回空字符串)。因此,通常要在过程体给“过程名”赋值。本题中函数p的返回值为B00100lean类型,功能是判断参数x是否能被7整除,如果不能整除返回True,否则返回False。Command1 Click事件过程中使用了单行的If语句,不需要Else分支和EndIf语句。程序功能是统计1-500范围内不能被7整除的整数个数。
转载请注明原文地址:https://kaotiyun.com/show/cCQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮和一个文本框,然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在文本框中输入的其他所有英文字母,并以大写方式降序显示到Text1中。例如,若在Text1中输入的
若要将一个窗体从内存中清除,应该使用的方法是()。
结构化程序设计的核心和基础是()。
对长度为n的线性表进行顺序查找,在最坏情况下需要比较的次数为()。
下列关于文件的叙述中,说法不正确的是()。
在窗体上画两个单选按钮,名称分别为Option1和Option2,标题分别为“黑体”和“楷体”;一个复选框,名称为Check1,标题为“粗体”。要求程序运行时,“黑体”单选按钮和“粗体”复选框被选中,则能够实现上述要求的语句序列是()。
设计软件结构是在软件生命周期的()。
下面程序运行后,单击命令按钮,输出的结果是PrivateSubCommand1_Click()Dima%(1To4),b%(2To6),i%,str1#,str2#Fori=
程序的3种基本控制结构是
下面运行程序后,单击命令按钮,输出出的结果是【】。PrivateSubCommand1_Click()Dima%(1To5),i%,s#Fori=1To5
随机试题
过盈联接装配,是依靠配合面的( )产生的摩擦力来传递转矩。
A.痰饮B.悬饮C.溢饮D.支饮饮证,症见脘腹痞胀,泛吐清水,脘腹部水声辘辘属于
该病人最有意义的检查为B超示肝内外胆管扩张,此时梗阻部位应在
氯化钾注射液的正确给药方法是()。
根据《药品经营质量管理规范》药品出库应遵循的原则是()。
对民事诉讼二审中发生的一些特殊情况的处理,以下哪些说法是错误的:()
CBD内的商务活动向外可划分为四个圈层,下列不属于商务活动圈层的是()。
()不属于工作分析准备阶段的内容。
Accordingtoasurvey,whichwasbasedontheresponsesofover188,000students,today’straditional-agecollegefreshmenare"
Mostpeopleoftendreamatnight.Whentheywakeinthemorningtheysaytothemselves,"WhatastrangedreamIhad!Iwonderwh
最新回复
(
0
)