首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command l_Click()Dim x As Integer x=1 0 Print funl(x,12)+x End Sub Private Function f
编写如下程序: Private Sub Command l_Click()Dim x As Integer x=1 0 Print funl(x,12)+x End Sub Private Function f
admin
2019-07-30
67
问题
编写如下程序:
Private Sub Command l_Click()Dim x As Integer x=1 0
Print funl(x,12)+x
End Sub
Private Function fun l(m As Integer,n As Integer)As Integer
Ifn>10 Then m=n
fual=m+n
End Function
程序运行后,单击命令按钮Commandl,输出结果为
选项
A、30
B、32
C、34
D、36
答案
D
解析
本体是一个简单的函数调用,调用funl函数时将x的值作为实参传送给funl函数,由于第二个参数12满足n>10,会将形参m的值也改变为12,因返回的函数值为24;由于函数funl的各个参数为地址传递,因此对于形参m的值会影响实参x的值,即x的值也变为12。
转载请注明原文地址:https://kaotiyun.com/show/VlUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)考生文件夹下有一个工程文件sjt3.vbp,其窗体上有1个名称为Text1的控件数组;一个标题为"排序"的命令按钮。程序运行时,在文本框数组中输入8个整数,如图3—29(a)所示;然后单击”排序”按钮,则8个整数按降序排序,如图3—29(b)所示。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。再建立一个下拉菜单,菜单标题为“文件”,名称为File,此菜
(1)在名称为Form1的窗体上画一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在运行时当用鼠标右键单击窗体时,弹出此菜单,
设x是整型变量,与函数IIf(x>0,-x,x)有相同结果的代数式是
现有语句:y=IIf(x>0,xMod3,0)设x=10,则y的值是
以下关于过程及过程参数的描述中,错误的是
以下表达式与Int(3.5)的值相同的是
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是
随机试题
经注册的设备监理工程师有()情形的,由原注册登记机构注销注册。
Ithasbeenjustlysaidthatwhile"wespeakwithourvocalorganswe【C1】con________withourwholebodies."Allofuscommunica
下列属于我国公务员回避制度中应回避的亲属关系是
以下属于心功能Ⅱ级患者的表现是
患者,男,25岁。足底刺伤后发生破伤风。入院时患者频繁抽搐,护理时足底伤口换下的敷料的处理是
对违反《消防法》规定的消防安全违法行为的行政处罚,由()裁决。
随着微信用户群体不断扩大,微信在流量获取、社群运营、用户规模与黏性方面的优势越发明显,越来越多的教育产品开始________微信生态探索新的服务模式,吸引用户进行________分享,以降低获得新用户的成本,提升用户黏性。 依次填入划横线部分最恰当的一
级数的收敛域为______,和函数为______.
给出下列代码,则数组初始化中哪项是不正确的? byte[]array1,array2[]; bytearray3[][]; byte[][]array4;
Raincloudsarecharacterizedprimarilyby______.Whichofthefollowingisthebesttitleforthepassage?
最新回复
(
0
)