首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Label2、Label3的标签。编写如下程序: Private X As Integer Private Sub Commandl_Click() Sta
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Label2、Label3的标签。编写如下程序: Private X As Integer Private Sub Commandl_Click() Sta
admin
2018-05-08
60
问题
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Label2、Label3的标签。编写如下程序:
Private X As Integer
Private Sub Commandl_Click()
Static Y As Integer
Dim z As Integer
n=5
Z=Z+n
Y=Y+n
x=x+Y
Labe11=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
解析
变量x被定义为窗体模块变量,它在整个窗体模块中有效。Click事件中变量y定义为Static,即静态变量,它的值在每调用过程时都会保留上次的值。每次单击按钮标签中显示的值即x、y、z的值是:
第一次,n=5,z=z+n=0+5=5,y=y+n=0+5=5,x=x+y=0+5=5;
第二次,n=5,z=z+n=0+5=5,y=y+n=5+5=l0,x=x+y=5+10=15;
第三次,n=5,z=z+n=0+5=5,y=y+n=10+5=15,x=x+y=15+15=30;
因此3次单击命令按钮后,3个标签中分别显示的是30 15 5。
转载请注明原文地址:https://kaotiyun.com/show/pcGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有名称为VScrolll的垂直滚动条,其Max属性为100,Min属性为50,则能正确设置滚动条Value属性的语句是______。
以下程序段的输出结果是【】。num=0DoWhilenum<=5num=num+1LoopPrintnum
在一个窗体上有一个命令按钮,CmdMax。单击CmdMax时,窗体上显示“字体由小变大”,字号每次增加2。请填空。PrivateSubForm_Load()Form1.Caption=“字体变化示范”CmdMax
下面的程序是找出两个正整数a和b,使得a<b、a+b=99、a和b的最大公约数是3的倍数,并统计满足条件数对的个数。OptionExplicitDimaAsInteger,bAsInteger,nAsInteger,cAsI
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:PrivateSubCommand1_Click()StaticxAsIntegerStaticyAsIntegerClsy=1y=
冒泡排序在最坏情况下的比较次数是
一间宿舍可住多个学生,则实体宿舍和学生之间的联系是
若将变量TestDate声明为Date类型,则下列为变量TestDate赋值的语句中正确的是()。
假定有以下循环结构DoUntil条件表达式循环体Loop则以下正确的描述是
在学校中,“班级”与“学生”两个实体集之间的联系属于()关系。
随机试题
推理是从一组具体事物经过分析综合得出一般规律,或者从一般规律推出新的具体结论的思维活动。前者叫演绎推理,后者叫归纳推理。()
细菌培养的前列腺标本必须做到
从某乡人口资料中得,全乡2005年年初人口数为15400人,年末人口数为17200人,全年活产数为174人。死亡总数为87人,其中新生儿死亡1人。计算该乡粗出生率的正确公式为
中毒型痢疾多见于
《建筑基坑支护技术规程》规定的一般土质地层是指我国范围内第四纪()沉积土。
桥梁上部结构的主要施工技术有()。
某市一帆风顺运输公司和北京方圆商业贸易公司签订一运输合同,将甲的货物运往乙地,合同列明运费20万元,保险费5万元,装卸费4万元,一帆风顺运输公司按“运输合同”缴纳的印花税为1000元。()
()是影响储存商品质量变化的主要因素。
从理论和一般常识上来检查资料内容是否合理,指标之间是否矛盾的数据审核方法是()。
"Howfarisittothenextvillage?"TheAmericanasksamansittingbythesideoftheroad.Insomecountries,becausetheman
最新回复
(
0
)