首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Commandl_Click() Dim x As Integer,s As Integer x=1 For k=1 To 3 x=x+1:proc
有下面程序代码: Private Sub Commandl_Click() Dim x As Integer,s As Integer x=1 For k=1 To 3 x=x+1:proc
admin
2017-11-23
56
问题
有下面程序代码:
Private Sub Commandl_Click()
Dim x As Integer,s As Integer
x=1
For k=1 To 3
x=x+1:proc x:s=s+x
Next k
Print s
End Sub
Private Sub proc(ByVal a As Integer)
Static x As Integer
x=x+1:a=a+x
End Sub
程序运行后,单击命令按钮Commandl,输出结果是
选项
A、6
B、9
C、15
D、19
答案
B
解析
本题中首先要区分在命令按钮的单击事件中定义的x是局部变量,仅能在过程内部起作用;在子过程proc中定义的静态变量x也是局部变量,也只能在本过程中起作用。在VB的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用;若用ByRef声明,说明此参数为传址调用;没有说明传递类型,则默认为传址传递。即形参的结果会传递给实参。本题中proc过程的参数a用的是值传递,因此形参的改变不会影响到实参,所以在命令按钮的单击事件中循环累加的是2+3+4=9。
转载请注明原文地址:https://www.kaotiyun.com/show/JNGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮,并编写如下事件过程:PrivateSubCommand1_Click()CommonDialogFlags=cdlOFNHideReadOnly
下列选项中不属于结构化程序设计方法的主要原则的是
以下程序段的输出结果是【】。num=0Whilenum<=2num=num+1Printnum;Wend
在窗体上画一个命令按钮,然后编写如下程序:(假定变量x是一个窗体级变量)DimxAsIntegerSubinc(aAsInteger)x=x+aEndSubPrivateSubComma
下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量:DimPaintStartAsBoolean编写如下事件过程:PrivateSubForm_Load
下面程序段的作用:在窗体上一个命令按钮。单击命令按钮后,将程序中字符串"WelcomeHome"中的字符全部大写输出,其后字符"WelBack"全部小写输出。请填空。PrivateSubCommand1_Click()
在窗体中画一个命令按钮,然后编写以下事件过程:PrivateSubCommand1_Click()Forj=1To3PrintTab(3*j)11*(2*j-1);
为了使能在DOS或Windows下运行的可执行程序也可以在VisualBasic中调用,可通过调用函数来实现。
在窗体上放一个文本框Text1,在文本框中输入456,并有如下事件过程:PrivateSubForm_Click()x=InputBox("请输入一个整数")Printx+Text1.TextEnd
随机试题
在Windows中,如果想同时改变窗口的高度和宽度,可以通过拖放滚动条实现。()
一级消除动力学的特点为( )。
施工现场应实行封闭式管理,围墙坚固、严密,高度不得低于________米。
(2010年)雨水泵站可分为()等类型。
我国现行环境保护基本法是()年颁布实施的。
第二审人民法院在审理过程中,认为一审判决认定的事实存在重大错误时,正确的做法应当是,( )。
关于基金管理公司发起设立的“好人举手”制度,其主要原则是()
某市第五次人口普查报告中关于外出人口受教育程度的统计各年龄段的外出人口中,扫盲班及未上过学的人口比例最高的是()。
吸毒人员黄某在贩卖毒品时被民警陈某抓获,陈某对其进行人身检查时,怀疑其身上可能带有注射针筒、刀片等物品,便使用手套进行检查。民警陈某使用手套的目的是:
【微材料】单位让小李和小陈两个人合作举办单位的年度表彰大会。你觉得在举办大会的过程中,如果两个人合作需要注意哪些方面?
最新回复
(
0
)