首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Commandl_Click() Private Function fun(ByRef n As Integer)
窗体上有一个名称为Commandl的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Commandl_Click() Private Function fun(ByRef n As Integer)
admin
2017-06-21
31
问题
窗体上有一个名称为Commandl的命令按钮,一个名称为Text1的文本框。编写如下程序:
Private Sub Commandl_Click() Private Function fun(ByRef n As Integer)
Dim x As Integer If n MOd 3=0 Then
x=Val(InputBox("输入数据")) n=n+n
Text1=Str(x+fun(x)+fun(x)) Else
End Sub n=n*n
End If
fun=n
End Function
对于上述程序,以下叙述中错误的是
选项
A、语句fun=n有错,因为n是整型,fun没有定义类型
B、运行程序,输入值为5时,文本框中显示655
C、运行程序,输入值为6时,文本框中显示42
D、ByRef表示参数按址传递
答案
A
解析
本题中的函数fun的功能是判断参数是否能被3整除,若可以整除则将n翻倍,否则将n变为n的平方返回。在函数头部没有声明函数的返回值类型,默认为变体型,可以接受任何数据类型的赋值;ByRef表示参数按址传递,对形参的改变将会影响实参;当输入5的时候输出5+25+625=655;当输入6的时候输出6+12+24=42。
转载请注明原文地址:https://kaotiyun.com/show/QTGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=0n=InputBox("")Fori=1Ton
下列叙述中错误的是()。
属性窗口分为4个部分,这4个部分分别是______。
以下叙述中错误的是
当列表框中的项目较多、超过了列表框的长度时,系统会自动在列表框边上加一个______。
以下叙述中错误的是
在窗体上画一个名称为File的文件列表框,并编写如下程序:PrivateSubFile1_DblClick()x=Shell(File1.FileName,1)EndSub以下关于该程序的叙述中,
输入任意长度的字符串,要求将字符顺序倒置,例如,将输入的“ABCDE”变换成“EDCBA”。请把程序补充完整。PrivateSubCommandl_ClickDima$,i%,c$,d$
设树T的度为4,其中度为1,2,3,4的结点个数分别为4,2,1,1。则T中的叶子结点数为
已知二叉树BT的后序遍历序列是dabec,中序遍历序列是debac,它的前序遍历序列是
随机试题
【背景资料】某项目部承建一城市主干路工程。该道路总长2.6km,其中0K+550~1K+220穿过农田,地表存在0.5m的种植土。道路宽度为30m;路面结构为:20cm石灰稳定土底基层,40cm石灰粉煤灰稳定砂砾基层,15cm热拌沥青混凝土面层;
张某将自己的房屋作价100万元转让给秦某,秦某略加修缮,居住1年后以150万元的价格转让给叶某,叶某居住1年后又以200万元的价格转让给包某。以上几次转让均未办理房产过户手续。后该房屋价格上涨至400万元,四人均对该房屋主张所有权。则该房所有权应属于(
根据企业所得税法律制度的规定,下列各项中应计入应纳税所得额的有()。
为图中谱例的第二、第三小提琴声部编写旋律。要求:(1)标明调式调性。(2)第一小提琴声部为先行声部,第二、第三小提琴声部为和应声部,大提琴声部为附加声部,采用同度模仿写法,时间间隔为两小节。
全国人民代表大会代表或者县级以上地方人民代表大会代表,如果因为是现行犯被拘留,执行拘留的公安机关应当立即向该级人民代表大会主席团或者常务委员会报告。()
请从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性。
战略数据规划方法将产品、服务及资源的生命周期划分为4个有序的阶段,其顺序应该是()。
In1942,theHMSEdinburghwassunkintheBarentsSea.Itwasonits【21】______backtoBritainwithninety-oneboxesofRussian
OnJuly7th,IwastravelinginLondon.IwashavingbreakfastatahotelverynearLiverpoolStreetStationwhenthefirstexpl
HowmanypeoplediedinriotsonTuesday?
最新回复
(
0
)