首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click()Dim i As Integer For i=1To500 If p(i)Then s=s+1 Next Print
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click()Dim i As Integer For i=1To500 If p(i)Then s=s+1 Next Print
admin
2016-09-19
77
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下:
Private Sub Command1_Click()Dim i As Integer
For i=1To500
If p(i)Then s=s+1
Next
Print s
End Sub
Private Function p(x As Integer)As Boolean
If x Mod7<>0Then
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的返回值为Boolean类型,功能是判断参数x是否能被7整除,如果不能整除返回True,否则返回False。C0mmand1_Click事件过程中使用了单行的If语句,不需要Else分支和EndIf语句。程序功能是统计1-500范围内不能被7整除的整数个数。
转载请注明原文地址:https://kaotiyun.com/show/1OLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下用户自定义函数FunctionFunc(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger.iAsInteger m=0:i=2 i=i+m+i
编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger) PrintChr(KeyCode)EndSubPrivateSubFo
在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load() Text1
窗体、图片框或图像框中的图形通过对象的______属性设置。
面程序的功能是找出能够被13、23、43除余数分别为1、2、3的最小的两位正整数。请填空。PrivateSubForm_Click() DimiAsInteger,jAsInteger j=0 j=43
在窗体模块的声明段中用Public定义的变量可以在________模块中使用,而用Dim或Private关键字定义的变量可以在_______模块中使用。
在窗体上画一个名称为“Command1”的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimaAsString a="123456789" Fori=1To5
以下能从字符串"VisualBasic"中直接取出子字符串"Basic"的函数是()。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Crick()DimIAsInteger,nAsIntegerForj=0T
在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimstrAsString,nAsIntegerStr=UCas
随机试题
某一方法经反复测定所得出的结果很接近于真值,可用下列哪一名称表示
A.胃黏膜相关组织淋巴瘤B.鼻腔NK/T细胞淋巴瘤C.Burkitt淋巴瘤D.蕈样霉菌病E.弥漫大B细胞淋巴瘤可以不用放化疗就能治愈的淋巴瘤是
慢性支气管炎临床特点为
与完成呼吸功能关系密切的是
在福费廷业务中,银行买断票据,必须放弃对出口商所贴现款项的追索权。()(2012年上半年)
在党风廉政建设责任制中,对于组织处理类的责任追究最重的处理方式是免职。()
“安慰剂效应”是指让病人在不知情的情况下服用完全没有药效的假药,却能得到与真药相同甚至更好效果的现象。“安慰剂效应”得到了很多临床研究的支持。对这种现象的一种解释是:人对于未来的期待会改变大脑的生理状态,进而引起全身的生理变化。以下陈述都能支持上述解释,除
甲有个人财产30万元,死后未立遗嘱,甲的妻子乙和甲的哥哥丙仍在世。甲还有一女儿,15年前与丁结婚后不久即去世,未留有子女,丁在其妻子死后对甲乙仍然尽了主要赡养义务,问该遗产该如何继承?
这是表演艺术家李默然第一次演电影,相比起在话剧舞台上的__________,突然站在镜头前.李默然称“根本不会动了”。对比话剧舞台和电影艺术,李默然总结道,一个是需要__________,一个是需要收缩。填入划横线部分最恰当的一项是:
下列程序段的运行结果是()。#include<stdio.h>voidmain(){charstr[]="ABC",*p=str;printf("%d\n",*(
最新回复
(
0
)