首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click( ) Dim x As Integer.y As Integer x=InputBox(“输入第一个数”) y=InputBox(
编写如下程序: Private Sub Command1_Click( ) Dim x As Integer.y As Integer x=InputBox(“输入第一个数”) y=InputBox(
admin
2020-05-11
99
问题
编写如下程序:
Private Sub Command1_Click( )
Dim x As Integer.y As Integer
x=InputBox(“输入第一个数”)
y=InputBox(“输入第二个数”)
Call f(x,y)
Print x,y
End Sub
Sub f(a As Integer,ByVal b As Integer)
a=a*2
x=a+b
b=b+100
End Sub
程序运行后,单击命令按钮Command1,并输入数值10和15,则输出结果为( )。
选项
A、10 115
B、20 115
C、35 15
D、20 15
答案
D
解析
程序中过程f的参数a默认为按址传递,参数b指定按值传递,因此调用f(x,y)时,x的值会受到影响,y的值不会。程序中输入10和15,则x=10,y=15。调用f(x,y),在过程中a=a*2,即a=10*2=20,变量x是过程f中的局部变量,没有用处可不用理会,b=b+100,即b=15+100=115。a的值即按钮单击事件中变量x的值,因此x=20,而y的值仍是原来的值15,因此Print x,y输出20 15。
转载请注明原文地址:https://kaotiyun.com/show/q7Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
一个教师讲授多门课程,一门课程由多个教师讲授。则实体教师和课程间的联系是
列表框中的项目保存在一个数组中,这个数组的名字是
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为vScroll1的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Form1的窗体上画三个命令按钮,其名称分别为C1、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-125所示)。程序运行后,如果单击“读入数据
(1)在名称为Form1的窗体上画一个名称为Label1、标题为“添加项目:”的标签;画一个名称为Text1的文本框,没有初始内容;画一个名称为Combo1的下拉式组合框,并通过属性窗口输入若干项目(不少于三个,内容任意);再画两个命令按钮,名称分别为Co
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为( )。
下列方法中,属于白盒法设计测试用例的方法的是()。
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
数据流图中带有箭头的线段表示的是()。
支持子程序调用的数据结构是
随机试题
下列哪些症状是属湿热内蕴夹有瘀热的遗精
促进性腺发育成熟的物质是
下列哪种产后病与血瘀无关
排水固结法处理地基,当采用∮7cm袋装砂井和塑料排水板作为竖向通道时,竖向排水通道长度主要取决于工程要求和土层情况,对以地基稳定性控制的工程,竖向排水通道深度至少应超过最危险滑动面()m。
世界贸易组织的最高权力机构是______。
大科学工程“人造太阳”,主要是将氘核聚变反应释放的能量用来发电,氘核聚变反应方程是:。氘核聚变反应中释放的核能约为()。
科技工作者因尽到了道德义务而受到社会的尊重。如果个别科技工作者出于私利支配,背离真善美的良知,做出危害社会的科技行为选择,如为法西斯侵略战争服务,他们就要受到社会舆论的谴责,就要受到社会的制裁。还有一类不正当的科技行为,如非法占有他人成果,这也应受到谴责和
(中山大学2013)采用直接标价时,如果需要比原来更少的本币就能兑换一定数量的外币,则表明()。
1949年3月,在中国人民革命即将取得全国胜利的前夕,中国共产党在河北省平山县西柏坡村召开了中共七届二中全会,毛泽东在会上作了报告。主要内容有()
Writeanessayof160—200wordsbasedonthefollowingdrawing.Inyouressay,youshould1)describethedrawingbriefly,2)
最新回复
(
0
)