首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Command1_Click( ) Dim a As Integer,b a=2 b=3 Printfun(a,b);a;b End
有下面程序代码: Private Sub Command1_Click( ) Dim a As Integer,b a=2 b=3 Printfun(a,b);a;b End
admin
2020-08-10
52
问题
有下面程序代码:
Private Sub Command1_Click( )
Dim a As Integer,b
a=2
b=3
Printfun(a,b);a;b
End Sub
Private Function fun(ByVal x As Integer,y)As Integer
y=x * y
x=y
fun=x
End Function
执行Command1_Click过程后的输出结果是( )。
选项
A、6 2 3
B、6 6 6
C、6 2 2
D、6 2 6
答案
D
解析
本题考查参数传送相关知识,在程序中定义了一个Function函数过程fun,并设置形参的传递方式为ByVal(传值调用),形参y的传递方式为默认传递方式ByRef(传引用调用);在Command1_Click事件过程中,使用print方法输出三个值,分别为fun函数的返回值,变量a和变量b,由于实参a值给形参x,传递的方式为ByVal,fun函数中对x的任何改变都不会影响实参a,所以在command1_Click过程中变量a的值不会改变;实参b传递地址给形参y,fun函数中对y的任何改变都会影响实参b,在fun函数中执行y=x*y语句后,y的值为6,执行x=y后,x的值为6,并且通过语句fun=x,将x的值作为函数的返回值返回到过程Command1_Click中,所以最终在过程Command1_Click中输出的单个值分别为:6,2,6。D选项正确,本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/rSHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是()。
设有窗体的FormMouseMove事件过程如下:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)If
编写如下程序:PrivateSubCommandlCliek()Dim.str1AsString,str2AsStringstr1=InputBox(“输入一个字符串”):subfstr1,str2:Printstr2
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)PrintText1.Text;EndSub运行程序,并在
设工程中有2个窗体:Form1和Form2,每个窗体上都有一个名称为Text1的文本框。若希望把Form1上文本框中的内容复制到Form2上的文本框中,应进行的操作是
窗体上有一个由两个文本框组成的控件数组,名称为Textl,并有如下事件过程:PrivateSubTextl_Change(IndexAsInteger)SelectCaseIndex
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是
随机试题
在WindowsXP的资源管理器中,利用文件的快捷菜单不能对文件进行查找操作。()
要使静电除尘器正常工作,其必须具备()电场。
在施工合同履行中,发包人按合同约定购买了玻璃,现场交货前未通知承包人派代表共同进行现场交货清点,单方检验接收后直接交承包人的仓库保管员保管,施工使用时发现部分玻璃损坏,则应由( )。
公司债券是公司与()的社会公众形成的债权债务关系。
在贷款存续期间,贷款人可对借款人的()等财务指标提出控制要求。
企业在进行员工培训需求分析时,应该把()作为企业培训的目标。
下面符合西餐用餐礼仪的做法是()。
小学生喜欢亲近老师,渴望得到夸奖,这种需要属于()。
一个机关列为长期保管的文件材料包括()。
汉字国标码GB2312.80把汉字分成2个等级。其中一级常用汉字的排列顺序是按
最新回复
(
0
)