首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个Timer1计时器,1个Shapel形状控件,还有下面程序代码: Dim flagAs Boolean Private Sub Form_Load() flag=True Timer1.Enabled=True Time
窗体上有1个Timer1计时器,1个Shapel形状控件,还有下面程序代码: Dim flagAs Boolean Private Sub Form_Load() flag=True Timer1.Enabled=True Time
admin
2017-11-23
28
问题
窗体上有1个Timer1计时器,1个Shapel形状控件,还有下面程序代码:
Dim flagAs Boolean
Private Sub Form_Load()
flag=True
Timer1.Enabled=True
Timer1.Interval=1000
End Sub
Private Sub Timer1_Timer()
If flag Then
Shape1.Height=Shape1.Height*2
Shape1.Width=Shape1.Width*2
Else
Shape1.Height=Shape1.Height*0.5
Shape1.Width=Shape1.Width*0.5
End If
flag=Not flag
End Sub
执行程序所产生的效果是
选项
A、Shape1的尺寸在缩小到原来一半和恢复原状这2种状态间切换,每秒切换一次
B、Shape1的尺寸在扩大到原来2倍和恢复原状这2种状态间切换,每秒切换一次
C、Shape1的尺寸在缩小到原来一半和扩大到原来2倍这2种状态间切换,每秒切换一次
D、Shape1的尺寸会不断扩大
答案
B
解析
在计时器事件中会判断窗体级变量nag的值,如果为真则形状尺寸扩大一倍,否则缩小到一半。由于第一次开始计时器事件的时候nag的值为True,所以首先会将形状扩大一倍,然后第二次计时器事件将形状恢复原状。
转载请注明原文地址:https://jikaoti.com/ti/0ty0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在设计阶段,当双击窗体上的某个控件时,所打开的窗口是()。
有如下程序:PrinvateSubForm_Click()a=10b=0Dob=b+aa=a-2Loo
当程序运行时,在窗体上单击鼠标,以下______事件是窗体不会接收到的。
获取文本框中被选取的文本内容的属性是()。
使用目录列表框的______属性可以返回或设置当前工作目录的完整路径(包括驱动器盘符)。
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommandl_Click()Dima%,b%,i%s=1a=
在数据库管理系统提供的数据语言中,负责数据的查询及增、删、改等操作的是
为了在运行时把“d:\pie”文件夹下的图形文件“a.jpg”装入图片框Picturel,所使用的语句为【】。
假定有一个名为pic2.gif的图形文件,要在运行期间把该文件装入一个图片框(Picture1),应执行的语句是【】。
随机试题
同步电动机晶闸管励磁装置逆变环节作用是在同步电动机正常停车肘,使励磁装置三相桥式全控电路从整流工作状态立即转为逆变工作状态,以保证转子励磁绕组的顺利灭磁。()
检测可溶性抗原不能用()。
石油沥青的针入度值越大,沥青材料的黏滞性()。
我终于找到了梦寐以求的工作。在我的生命里我从未感到如此激动过。
社会团体实际上附属在业务主管部门之下。()
红塔集团公司由亏损到利税大户的崛起是由褚时健一手搞起来的,他是国家的大功臣,可是正在其事业鼎盛的时期却因经济问题而锒铛入狱。抛开其个人思想方面的问题不谈,这与他的贡献与所得不符也是分不开的。上面这段话的意思是说()。
《学记》是我国最早的一部教育学专著。()
近年来,不少国家纷纷实施“人与生物圈计划”,目的都是为了寻求同一个答案。为什么人类在享受自己获得和创造的财富时,会不时受到大自然的种种惩罚?因为人类在土壤侵蚀、沙漠化、滥伐森林、越来越多的物种灭绝、环境污染等所导致的生态系统退化中,逐步意识到自身还没有真正
Networktelevision,magazine,anddirectmail—thatwillbethebiggainersinadvertisingrevenuesnextyear.
Whenitcomestousingtechnologytopromoteeducation,theprevailingwisdomhasbeenthatmoreisbetter.Overthepastdecade
最新回复
(
0
)