首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Private Function p(x As Integer)As Boolean
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Private Function p(x As Integer)As Boolean
admin
2018-10-18
31
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下:
Private Sub Command1_Click() Private Function p(x As Integer)As Boolean
Dim i As Integer If x 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、Command1 Click事件过程中lf语句的条件表达式不完整
C、Function过程定义有误,函数过程p的名称与该过程中的变量名p相同
D、函数过程p的返回值为Boolean类型
答案
D
解析
调用Function过程要返回一个值,因此可以像内部函数一样在表达式中使用。如果在Function过程中省略“过程名=表达式”,则该过程返回一个默认值(数值函数过程返回0值;字符串函数过程返回空字符串)。因此,通常要在过程体中给“过程名”赋值。本题中函数p的返回值为Boolean类型,功能是判断参数x是否能被7整除,如果不能整除返回True,否则返回False。Command1_Click事件过程中使用了单行的If语句,不需要Else分支和Endlf语句。程序功能是统计1-500范围内不能被7整除的整数个数。
转载请注明原文地址:https://kaotiyun.com/show/MxFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger m=1:n=0 DoWhilem
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load() Shape1.Top=0 Timer1.Interval=100
A、1B、0C、3D、出现错误提示A
下面不能作为结构化方法软件需求分析工具的是
以下关于数组的叙述中,错误的是
设有如下Command1的单击事件过程及fun过程:PrivateSubCommand1_Click() DimxAsInteger x=Val(InputBox("请输入一个整数")) fun(x)EndSubPrivate
以下说法中正确的是( )。
输入VisualBasic源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
产生100以内(不含100)2位随机整数的VisualBasic表达式是
设a=10,b=4,c=5,d=7,表达式a>bAndNotc
随机试题
[2008年,第120题]价值工程的价值是()。
背景A公司参与远离所在地炼钢厂的机电安装工程总承包的投标,投标前做了如下工作:1.分析了招标文件工程范围,本工程含机械设备安装、电气及自动化系统安装、钢结构及非标准件制作安装、工业给水排水施工、防腐及保温工程、筑炉工程。并分析本公司施工技术力量
“包装物”的借方登记()。
现金在商业银行资产负债中属于()。
2017年8月,一家新开业的小型微利商业企业,为了拓展市场,从开业之日起至12月31日销售商品一律实行买一赠一活动,开业5个月销售商品共计取得不含税销售收入225万元,赠送商品的不含税市场价格为15万元,全部销售商品和赠送商品的成本为180万元,应扣除的税
在对债务重组进行账务处理时,债权人对债务重组的应收账款是否冲销其已计提的坏账准备,并不影响债务重组年度净损益的数额。 ( )
旅游安全事故主要包括()
已知数据表A中每个元素距其最终位置不远,为节省时间,应采用的算法是______。
Itwaslateintheafternoon,andIwasputtingthefinaltouchonapieceofwritingthatIwasfeelingprettygoodabout.Iwa
ImaginethatanIrishmarketingfirmisdoingresearchinyourcountry.Youhaveagreedtoparticipateinatelephoneinterview
最新回复
(
0
)