首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下的程序: Private Sub Command1_Click() Dim k As Integer,m AB Integer Dim P As Integer k=4:m=1 P=Fun(k,m) =Print P; P=Fun(k,m) :Pri
有如下的程序: Private Sub Command1_Click() Dim k As Integer,m AB Integer Dim P As Integer k=4:m=1 P=Fun(k,m) =Print P; P=Fun(k,m) :Pri
admin
2010-11-20
64
问题
有如下的程序:
Private Sub Command1_Click()
Dim k As Integer,m AB Integer
Dim P As Integer
k=4:m=1
P=Fun(k,m) =Print P;
P=Fun(k,m) :Print P
End Sub
Private Function Fun(a As Integer,b As Integer)
Static m As Integer,i As Integer
m=5:i=2
i=i+m+1
m=i+a+b
Fun=m\2
End Function
单击命令按钮后,输出结果为
选项
A、 2 2
B、4 4
C、5 5
D、6 6
答案
D
解析
在Sub过程中,程序段先定义了3个Integer型变量k,m,F,并赋给k初值为4,m的初值为1,然后调用事件过程Fun,并将它的值赋给p;在事件过程Fun中定义了两个形参,参数的传送是通过引用实参,即将k,m的地址作为a,b的地址;在Fun中,将m,i定义为静态变量,所以第一次调用后的值仍然保留,但是m,i分别都有赋值语句,将它们的值变为 5,2,所以返回值不变,都是6,6。
转载请注明原文地址:https://kaotiyun.com/show/mpmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
阅读下面程序classTestimplementsRunnable{ publicstaticvoidmain(String[]args){ Testt=newTest(); t.start():
下列哪个选项是short型数据的取值范围?
下列Applet当鼠标进入窗口时,在状态栏显示“鼠标已进入”的提示信息。请填写正确的程序在横线处。importjava.awt.*;importjava.awt.event.*;publicclassTest10exte
Java中的方法的参数传递是______调用。
下面代码的运行结果是( )。publicclassConcatTest{publicstaticvoidmain(String[]args){Stringstr1="abc";
顺序执行下列两个语句的输出结果是______。Strings=“全国计算机等级考试”;System.out.priatln(s.length());
ActionEvent事件相应的监听器接口是()。
键盘键入字符串并在计算机屏幕上显示,这时的数据源是______。
请完善程序(程序文件名:Java_2.java)并进行调试。请在下画线处填入正确内容,然后删除下画线。请勿删除注释行和其他已有的语句内容。[题目要求]程序显示一个窗口。该窗口包含一个按钮和一个文本域,当单击按钮时将在文本域中显示当前日期,如
设某二叉树的后序序列与中序序列均为ABCDEFGH,则该二叉树的前序序列为
随机试题
有关组织目标、任务、方针、政策的信息,自上而下地传达、贯彻的过程指的是
主张限制进口、奖励出口,以有利于本同牛产厂商发展的政策是
关于眼眶肿瘤下列哪项是错误的()
可吸入性粉尘的直径小于()
患者女,24岁。与同事发生口角后出现手舞足蹈,喊叫、打滚,一会又喊着对方的名字骂,约半小时左右恢复正常。患者以前也有类似发作3次,脑电图等检查均未发现异常。最可能的诊断是
同一长度的压杆,截面积及材料均相同,仅两端支承条件不同,则()杆的临界力最小。
Hisfirstbook______nextmonthisbasedonatruestory.
Dogsaresocialanimalsandwithoutpropertraining,theywillbehavelikewildanimals.Theywillspoilyourhouse,destroyyou
TheWestlifestoryreallybeganwaybackinDecember1996whenthethreeoriginalmembersofWestlifewereperforminginalocal
Increasingnumbersoffarmersaregrowinggeneticallyengineeredcrops.Anewreportalsosaysthatthetotallandareawheresu
最新回复
(
0
)