首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序: Private Sub Commandl_click() Dim a(10) As Integer Dim x As Integer For i=1 To 10 a(i) =I Next
在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序: Private Sub Commandl_click() Dim a(10) As Integer Dim x As Integer For i=1 To 10 a(i) =I Next
admin
2013-03-30
38
问题
在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序:
Private Sub Commandl_click()
Dim a(10) As Integer
Dim x As Integer
For i=1 To 10
a(i) =I
Next I
x=1
MsgDox a(f(x) +x)
End Sub
Function f(y As Integer)
y=y+2
End Function
程序运行后,单击命令按钮,消息框的输出结果为______。
选项
答案
6
解析
本题考查VBA中参数传递的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用,此时形参的变化不会返回到实参;若用ByRef声明,说明此参数为传址调用,此时形参的变化将会返回到实参;没有说明传递类型,则默认为传址传递。本题中的函数f的形参y没有使用ByVal声明,则默认为传址传递。当求a(f(x)+x)的值的时候,先要求出f(x)+x的值。由于x的值为1,那么调用函数f以后得到f(x)的返回值为3,同时由于函数f中改变了形参y的值
转载请注明原文地址:https://kaotiyun.com/show/e6rp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
数据的存储结构是指()。
下面程序段运行后,变量x的值为上【】。DimxAsIntegerDimiAsIntegerx=Ofori=0to50step10X=X+inexti
以下程序找出50以内所有能构成直角三角形的整数组。阅读下列程序,并完成程序。PrivateSubCommand1_Click()Fora=1to50Forb=ato50c=S
假定窗体的名称为fmTest,则把窗体的标题设置为“计算机等级考试”的语句是【】。
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指______。
窗体中有两个命令按钮:“显示”,(控件名为cmdDisplay)和“测试”(控件名为CmdTest)。以下事件过程的功能是:单击“测试”按钮时,窗体上弹出一个消息框,如果单击消息框的“确定”按钮,隐藏窗体上的“显示”命令按钮:单击“取消”按钮关闭窗体。请按
以下是宏对象m的操作序列设计:假定在宏m1的操作中涉及到的对象均存在,现将设计好的宏m1设置为窗体“fTest1”上某个命令按钮的单击事件属性,则打开窗体“fTest1”运行后,单击该命令按钮,会启动宏m1的运行。宏m1运行后,前两个操作会先后打开窗体
常见的数据模型有3种,它们是______。
在E-R图中,用来表示实体之间联系的图形是______。
下列关于VBA面向对象中的“方法”说法正确的是()。
随机试题
乳腺癌患者乳头内陷、乳头抬高是由于
腰椎盘突出常出现在
一个在中国境内开办的生产电视机的外国企业,因其电视机质量存在问题,被中国公民投诉。当地工商行政管理局对该外国企业作出罚款6000元的决定,该外国企业不服,向人民法院提起行政诉讼。对于本案情况,下述观点中正确的是()。
设y=f(f),t=φ(x)都可微,则dy=()。
根据分布特点,城市污染源可分为()
质量认证第三方依据程序对产品、过程或服务符合规定的要求给予书面保证。质量认证包括( )。
实行对外贸易宏观管理的必要性是什么?
下列属于税收司法的基本原则的有()。
快递来了不敢开门,查水表的不让进屋,买肉时总用手按按看肉里有没有注水,去超市买牛奶面包看不清保质期绝不会轻易埋单……怀疑一切似乎成了当今社会很多人的心理共识,老百姓成了“老不信”这导致政府、专家及媒体等公信力严重受损。一项权威调查表明,中国社会的总体信任度
使用VC6打开考生文件夹下的源程序文件modi3.cpp。其中定义的类并不完整,按要求完成下列操作,将类的定义补充完整。完成以下功能:(1)类CBase有一个常数变量Number1,在构造函数时对其初始化,请在注释//********1********后
最新回复
(
0
)