首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox("输入数据")):Text1=Str(x+
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x=Val(InputBox("输入数据")):Text1=Str(x+
admin
2020-04-18
94
问题
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序:
Private Sub Command1_Click()
Dim x As Integer
x=Val(InputBox("输入数据")):Text1=Str(x+fun(x)+fun(x))
End Sub
Private Function fun(ByRef n As Integer)
If n Mod3=0Then
n=n+n
Else
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/6ZTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且己在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。Priva
文件d:\city.txt的内容如下:BeiJingTianJinShangHaiChongQing编写如下事件过程:PrivateSubForm_Click()DimInDOpen”d:\city.tx
窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下:PrivateSubCommandl_Click()Open”c:\f1.txt”ForInputAs#1:Open”c:\f2.txt”ForOutputAs#
为了保存数据,需打开顺序文件“E:\UserData.txt”,以下正确的命令是
下列描述中,错误的是
下面关于直线控件的叙述中正确的是
以下说法中正确的是
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为()。
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
随机试题
患儿为40周足月儿,顺产,生后半小时即出现呕血。为明确诊断,应最先考虑的检查有
双抗体夹心ELISA法是检测
硝酸酯类用于钙通道阻断药最适用于
下列项目中,应记入“营业外支出”账户的有()。
甲公司为增值税一般纳税人,该企业购进固定资产相关的增值税额可以抵扣,适用的增值税税率为17%。甲公司2010年至2013年与固定资产有关的业务资料如下:(1)2010年11月1日,甲公司以自营方式建造一条生产线。购入工程物资,取得的增值税专用发票
1+2+3+4+……+n=2005003,则自然数n=()。
已知方程有通解求满足条件的φ(x).
以下程序段的输出结果是X=1:Y=4DoUntilY>4X=X*Y:Y=Y+1LoopPrintX
Peoplewhoworknightshiftsareconstantlyfightingagainstan“internalclock”intheirbodies.Quiteoftentheclocktellsth
A、Mildcognitiveimpairmentcanbecuredbyweightlifting.B、Increasedmusclestrengthcanimprovebrainfunctioninolderadul
最新回复
(
0
)