首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个名称为Commandl的命令按钮,并有如下程序: Private Sub Command 1 Click() Static X As Integer Static Y As Integer Cls Y=1:Y=Y+5:X=5+X:Print
在窗体上有一个名称为Commandl的命令按钮,并有如下程序: Private Sub Command 1 Click() Static X As Integer Static Y As Integer Cls Y=1:Y=Y+5:X=5+X:Print
admin
2019-03-14
31
问题
在窗体上有一个名称为Commandl的命令按钮,并有如下程序:
Private Sub Command 1 Click()
Static X As Integer
Static Y As Integer
Cls
Y=1:Y=Y+5:X=5+X:Print X.Y
End Sub
程序执行时,单击命令按钮Commandl三次后,窗体上显示的结果为( )。
选项
A、1 516
B、56
C、1 51 5
D、156
答案
D
解析
本题考查静态变量。静态变量的值有继承性,上一次调用的结果在下一次调用时还是有效的。题目中每次调用Y的值都被重新赋值了,因此单击3次以后Y的值仍然是6,而X每次调用的结果都保留,因此调用3次以后,结果为15。
转载请注明原文地址:https://kaotiyun.com/show/y7Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:DimSaveAllAsStringPrivateSubForm_Load() Show
设窗体上有1个名称为List1的列表框,程序运行时,如果选中了第3个列表项(最上面的列表项为第0个列表项),则下面不成立的是
设有如下程序:PrivateSubForm_Click() num=InputBox("请输入一个实数") p=InStr(num,".") Ifp>0Then PrintMid(num,p+1) Else
某人为计算n!(0<n<=12)编写了下面的函数过程:PrivateFunctionfun(nAsInteger)AsLongDimPAsLongP=1Fork=n一1To2Step一1P=P*kNextkfun=P
编写如下程序:PrivateSubCommand1Click()n=InputBox(“输入一个数”)DoWhilen0Printn\10MOd10;:PrintnMod10;:11=n\100LoopPrintsE
数据库应用系统中的核心问题是
在名称为Forml的窗体上画一个名称为CDl的通用对话框,通过属性窗口设置CDl的初始路径为c:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
在考生文件夹下有一个工程文件sjt5.vbp,其名称为Form1的窗体上已有三个文本框Text1、Text2、Text3,以及程序。请完成以下工作:①在属性窗口中修改Text3的适当属性,使其在运行时不显示,作为模拟的剪贴板使用,窗体如图3-15
下面的数写成普通十进制数是()。8.6787E+8
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
随机试题
工件夹紧时,夹紧力的确定包括()。
LosAngeleshasplanted2,000rubbertreesdownthemiddleofoneofitsmainstreets.Thesetreesdonot【C1】______rubber.They
关于乳腺摄影的叙述,错误的是
降压反射的生理意义是()。
某自重湿陷性黄土场地一座7层民用建筑,外墙基础底面边缘所围面积尺寸为宽15m、长45m。拟采用正三角形布置灰土挤密桩整片处理消除地基土层湿陷性,处理土层厚度4m,桩孔直径0.4m。已知桩间土的最大干密度为1.75t/m3,地基处理前土的平均干密度
国家预算收入最主要的部分是()。
会计专业技术资格分为()。
下列选项中,属于不利于分权的因素是()。
Tofunctionwellintheworld,peopleneedagoodsenseofwheretheirbodyisinspaceandhowit’spostured.This"positionse
设有下面的程序段:x=InputBox("请输入一个整数")ReDima(x)Fork=xTo0Step-1a(k)=kNextk一般,在这段程
最新回复
(
0
)