首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Labe12、Labe13的标签。编写如下程序: Private x As Integer Private Sub Commandl_Click() Static y As Intege
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Labe12、Labe13的标签。编写如下程序: Private x As Integer Private Sub Commandl_Click() Static y As Intege
admin
2020-04-18
74
问题
窗体上有名称为Commandl的命令按钮,名称分别为Labell、Labe12、Labe13的标签。编写如下程序:
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
Labell=x:Labe12=y:Labe13=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/P8Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某人编写了向随机文件中写一条记录的程序,代码如下:TypeRType NameAsString*10 TelAsString*20EndTypePrivateSubCommand1_Click() DimpA
语句:PrintInt(Rnd*5+20)的输出不可能是()。
表达式Sgn(0.25)的值是( )。
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:PrivateSubfunc(LAsLabel) L.Caption="1234"EndSubPrivateSubForm
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个命令按钮、三个标签和三个文本框,均使用默认名称。程序的功能如下:①如果单击“读数据”命令按钮,则将考生文件夹下in5.dat文件中两组已按升序方式排列的数(每组30个数)分别读人数组A和B,
设“A="87654321"”,则表达式Val(Left(A,4)+Mid(A,4,2))的值为()。
下列叙述中正确的是
在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)End
设有下列二叉树:对此二叉树中序遍历的结果为()。
在E-R图中,用来表示实体联系的图形是( )。
随机试题
人类区别于动物的主要特征是_____。
人们常说“管理是一门艺术”强调的是()。
胃大部切除后出现巨幼红细胞性贫血,是由于下列哪种物质吸收障碍所致
骨盆入口略呈三角形,两侧壁内聚,坐骨棘突出,耻骨弓较窄,骶骨较直而前倾,致后矢状径较短骨盆入口呈卵圆形,入口前后径较横径长,骶坐切迹较宽,坐骨棘较突出,耻骨弓较窄
根据《建筑法》,关于承揽工程业务的说法,正确的是()。
混凝土的耐久性包括()等性能。
关于遗嘱信托,下列说法错误的是( )。
下列关丁文学研究会的捕述不正确的是()。
NoEnglishmanbelievesinworkingfrombooklearning.Hesuspectseverythingnew,anddislikesit,unlesshecanbecompelledb
WildBillDonovanwouldhavelovedtheInternet.TheAmericanspymasterwhobuilttheOfficeofStrategicServicesinWorldWar
最新回复
(
0
)