首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
81
问题
窗体上有一个名称为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 Mod 3=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/10Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
标准模块中有如下程序代码:PublicxAsInteger,YAsIntegerSubTempSub()x=10:y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommandl_C
在窗体中有一个名为Command1的命令按钮,并编写有以下代码。程序执行时,单击命令按钮,输出的结果为()。PublicSubProcl(nAsInteger,ByValmAsInteger)n=nMod10:
下列程序执行后,其输出结果为().Dima(5)Fori=0To4a(i)=i+1:m=i+1Ifm=3Thena(m-1)=a(i-2)Elsea(m)=a(i)Ifi=2Thena(i一1)=a(m-3)
设窗体上有名称为Option1的单选按钮,且程序中有语句:IfOption1.Value=TrueThen下面语句中与该语句不等价的是( )。
设一个工程文件包含多个窗体及标准模块,以下叙述中错误的是
现有表示患者和医疗的关系如下:P(P#,Pn,Pg,By),其中P#为患者编号,Pn为患者姓名,Pg为性别,By为出生日期,Tr(P#,D#,Date,Rt),其中D#为医生编号,Date为就诊日期,Rt为诊断结果。检索在1号医生处就诊的病人姓名的表达式是
随机试题
下列哪项有助于急、慢性肾衰竭的鉴别
患者,男,70岁。咳嗽、咳痰20天,食欲缺乏、腹泻2天,神志不清伴抽搐2小时。糖尿病史20年,不规律口服降糖药治疗。问题1:病史采集应重点注意
A.太渊B.中脘C.膈俞D.膻中E.章门
复方短效口服避孕药的主要作用机制是
小何是一名刚毕业于房地产专业的学生,在实习的时候参加了一家房地产经纪机构学习经验。作为甲房地产经纪公司(以下简称甲公司)的房地产经纪人,小何获得的报酬是每月1200元底薪,另加业务收入提成。工作之初,小何在甲公司A售楼处工作,认真负责,不懈努力,终于经过几
某机电工程安装公司(以下简称A公司)总承包了某石化装置安装工程的施工任务。装置施工的主要内容包括:单重30~80t的机电设备共28台;工艺管道4500m,介质有油、气等;全厂电气装置、自动化仪表安装调试工程、给水排水工程、防腐绝热工程施工。A公司将工程的给
财政部门及有关行政部门的工作人员徇私舞弊,情节特别严重的,处()有期徒刑。
PowerPoint中,在大纲视图模式下可以实现在其他视图中可实现的一切编辑功能。()
为了保障网络安全,防止外部网对内部网的侵蚀,多在内部网络与外部网络之间设置______。
WhichofthefollowingsentencesisINCORRECT?
最新回复
(
0
)