首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
2018-10-18
43
问题
窗体上有一个名称为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/GxFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体中有一个文本框Text1,若在程序中执行了Text1.SetFocus,则触发( )。
在窗体上画一个文本框,其名称为Text1,为了在程序运行后隐藏该文本框,应使用的语句为( )。
以下变量名中合法的是( )。
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:OptionBase1PrivateSubCommand1_Click()Dima(4,4)AsIntegerFori=1To4
窗体上有一个名称为Combo1的组合框,为了引用Combo1中最后一个列表项,应使用的表达式是
以下不属于VB控件的是
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger) DimcAsString
文本框Text1的KeyDown事件过程如下:PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger) ...EndSub其中参数KeyCode的值表示的是发生此事件时(
可以产生30~50(含30和50)之间的随机整数的表达式是( )。
以下能对正实数d的第3位小数四舍五入的表达式是
随机试题
对于变形缝的叙述中,不正确的是()。
天然气进行深冷分离,是由于天然气中的组分越轻,其沸点越低,要想从天然气中脱出沸点较低的(),必须进行深冷分离。
A、侏儒症B、呆小症C、肢端肥大症D、巨人症E、黏液性水肿成年人甲状腺功能低下,可引起
患者,男,57岁。便血色黑,伴腹部隐痛,喜热饮,面色不华,神倦懒言,便溏,舌质淡,脉细。治疗宜选
商业汇票的承兑期限一般不得超过()。
根据下面文字所提供的信息回答问题据统计,江苏省2005年上半年实现生产总值8212.85亿元,同比增长14.5%,比全国平均增幅高5个百分点。其中,第一产业增加值575.37亿元,增长4.5%;第二产业增加值4796.55亿元,增长17.1%;第三产
计算机中常采用下列几种编码表示数据,其中,±0编码相同的是()。I.原码Ⅱ.反码Ⅲ.补码Ⅳ.移码
P是以a为边长的正方形,P1是以P的四边中点为顶点的正方形,P2是以P1的四边中点为顶点的正方形,…,Pi是以Pi—1的四边中点为顶点的正方形,则P6的面积为()。
土地革命战争时期,毛泽东指出:“一国之内,在四周白色政权的包围中,有一小块或若干小块红色政权的区域长期地存在,这是世界各国从来没有的事。这种奇事的发生,有其独特的原因-。”红色政权能够存在和发展的主观原因和条件是()
John:Iheardthatyou’regoingtomove.Howaboutthenewhouse?Steve:Oh,it’sperfect!【D1】______Thesurroundingishomey.A
最新回复
(
0
)