首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim x As Integer, y As Integer x=InputBox("输入第一个数") y=InputBox("输入第二个数") Call f(x,
编写如下程序: Private Sub Command1_Click() Dim x As Integer, y As Integer x=InputBox("输入第一个数") y=InputBox("输入第二个数") Call f(x,
admin
2019-06-20
40
问题
编写如下程序:
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/S5Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列叙述中有错误的是()。
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click()m=-3.6IfSgn(m)Thenn=Int(m)Elsen=Abs(m)EndIfPrintnEndSub运
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr="":strL=Len(xStr)i=strL/2DoW
以下合法的VB变量名是
以下合法的VB变量名是
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)DimcAsStringC=UC
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:PrivateSubTimer1_Timer()StaticflagAs
窗体的MouseUp事件过程如下:PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)……EndSub关于以上定义,以下叙述中错误
双精度浮点数的类型说明符为
在编辑VB应用程序时,如果如果不小心关闭了属性窗口,则可以单击主窗口标准工具栏上的一个按钮直接打开属性窗口,这个按钮的图标是
随机试题
医疗保健机构及卫生防疫机构发现传染病时,应当及时采取的控制措施中不包括
在Excel中,要将有数据且设置了格式的单元格恢复为普通空单元格,应先选定该单元格,然后使用( )。
关于核定应纳税额,下列说法正确的是()。
不同股票指数的区别主要在于()。
2013年6月1日,甲因资金周转困难向乙借款50万元,2013年8月9日,甲因参与赌博欠乙10万元。现在乙想把对甲的债权让与给丙,下列表述正确的有()。
已知某企业净经营资产周转次数为2次,营业净利率为8%,股利支付率为40%,可以动用的金融资产为0,该企业的内含增长率为()。
甲企业于2018年12月1日向乙企业购买一批货物,约定货到付款。乙企业于2018年12月5日发货,在运输途中,乙企业得知甲企业被受理了破产申请,但是乙企业没有及时表示取回货物。在货物到达甲企业后,甲无力支付货款。则下列说法正确的有()。
下列历史人物中,不属于河南籍的是()。
“工农武装割据”的中心内容是()。
IfellandhurtmyselfwhileI______tennis.
最新回复
(
0
)