首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Label2、Label3的标签。编写如下程序: Private x As Integer Private Sub Commandl_Click() Stat
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Label2、Label3的标签。编写如下程序: Private x As Integer Private Sub Commandl_Click() Stat
admin
2018-10-15
50
问题
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Label2、Label3的标签。编写如下程序:
Private x As Integer
Private Sub Commandl_Click()
Static vAs Integer
Dim zAs Integer
n=5:z=z+n:y=y+n:x=x+y
Label1=x:Label2=y:Label3=z
End Sub
运行程序,连续3次单击命令按钮后,3个标签中分别显示的是
选项
A、5 5 5
B、15 10 5
C、15 15 15
D、30 15 5
答案
D
解析
Static语句在过程级别中使用,用于声明变量并分配存储空间,在整个代码运行期间都能保留使用Static语句声明的变量的值。在窗体的声明段用Private声明的变量为模块级变量,其作用域为整个窗体。本题中,当第1次单击时,静态变量y的初值为0,执行调用语句后,静态变量y的值应为5,模块级变量x的值为5;当第2次单击时,静态变量y的初值为5,执行调用语句后,静态变量y的值应为10,模块级变量x的值为15;当第3次调用过程时,静态变量y的初值为10,执行调用语句后,静态变量y的值应为15,模块级变量x的值为30。
转载请注明原文地址:https://kaotiyun.com/show/MUFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click() d=0 c=10 x=Array(10,12,21,32,24) Fori=
以下关于VB的叙述中,错误的是( )。
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
窗体上有一个Text1文本框和一个Command1命令按钮。程序的功能是在文本框中输入密码后单击命令按钮则进行密码确认,若密码正确,弹出信息框显示"密码正确",若密码错误,弹出信息框显示"密码错误,请重新输入",但最多允许输出3次,若还不正确,则弹出信息框
(1)在名称为Forml的窗体上添加一个名称为L1,标题为“业余爱好”的标签,再添加一个名称为Chl的复选框数组,含3个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”、“音乐”、“美术”,请设置复选框的属性,使其初始状态如下表所示。程
窗体上有单选钮和列表框控件。单击名称为Option1、标题为"国家"的单选钮,向列表框中添加国家名称,如下图所示。Option1的单击事件过程如下:PrivateSubOption1_Click() Dimarr arr=Array("
以下关于文件的叙述中,错误的是( )。
以下关于VisualBasic数组下标的说法中,错误的是
For循环的循环控制变量
在一个工程的窗体中有如下代码:PublicxAsIntegerPrivateSubForm_Load()DimyAsIntegerEndSub在该工程的标准模块的声明部分有如下代码:
随机试题
Mostpeopleagreethatthedirect,assertive(坚定自信的)Americanpersonalityisavirtue,butitsometimessurprisesforeigners.In
患儿,男,1岁,发热3天,呕吐数次,患儿精神萎靡,前囟饱满,怀疑化脓性脑膜炎拟行腰椎穿刺,穿刺部位应选择
不属于WTO主要协议的是()。
对于低碳钢取它的()作为设计强度取值的依据。
单位工程指标编制应列入的费用有()。
下列评估指标中,最能体现社会工作机构公信力的是()。
[*]
A.Cloud-to-groundlighteningoccurringintheUSB.TypesoflighteningC.CauseoflighteningD.Differencesbetweenthundera
Howmenfirstlearnedtoinventwordsis(31);inotherwords,theoriginoflanguageisamystery.Allwereallyknowisthatm
Whereisthespeechtakingplace?
最新回复
(
0
)