首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Private Function fun(ByRef n As Integer)
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Private Function fun(ByRef n As Integer)
admin
2020-01-02
22
问题
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序:
Private Sub Command1_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/bQTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设菜单编辑器中各菜单项的属性设置如下表所示针对上述属性设置,以下叙述中错误的是
若在窗体模块的声明部分声明了如下自定义类型和数组PrivateTypeTemScoreAsIntegerStrNameAsStringEndTypeDimStudent(5)AsTem
下列程序段不正确的是()。
在窗体上画一个命令按钮(Name属性为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()Dima(10)AsInterger,p(3)AsIntergerK=5F
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。PrivateSubCommand1Cliek()D
下列关于水平滚动条的叙述中,错误的是()。
以下不能用形状控件画出的图形是()。
(1)在名称为Form1的窗体上画一个标题为“直辖市”、名称为。Frame1的框架,在框架中画一个名称为Combo1的组合框,其编辑域为空,有如图所示的4个列表项,外观风格也与图中相同。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.v
随机试题
《论语》
外国有学者称刑事诉讼法为“宪法适用法"(AppliedConstitutionallaw)。问题:请你运用刑事诉讼法学的基本理论。简要谈谈你对这种说法的理解。(北大2004年研)
回盲部结核病变,使回肠反射亢进增生型肠结核或并发肠梗阻
尿蛋白试带对尿中哪种蛋白质最敏感
某女孩,13岁,在家不慎触电,导致心脏、呼吸骤停,护士对其施行心肺复苏术,心脏按压与人工呼吸次数之比是
已知A公司销售当季收回货款的55%,下季度收回货款的40%,下下季度收回5%,预算年度期初应收账款金额为28万元,其中包括上年第三季度销售的应收账款10万元,第四季度销售的应收账款18万元。下列说法中不正确的是()。
黄旭华,1926年3月12日出生于广东省海丰县红海湾区田亁镇,祖籍广东省揭阳县新寮村(客家人),中船重工集团公司719研究所研究员、名誉所长,中国第一代攻击型核潜艇和战略导弹核潜艇总设计师。他开拓了中国核潜艇的研制领域,1994年当选为中国工程院院士。为保
Despitehelpingtorecordevents,photoscoulddamageourmemories.Researchersfoundpeoplewhotakepictureshave【C1】______rem
Thecakeisdelicious,John.-Wouldyouliketohave____more?
To:PaulineSottoFrom:JoeyClareteDate:June26Subject:ProductInquiryIamoneoftheownersofCompTavernInternetCafe
最新回复
(
0
)