首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Form_Load() flag = True Timer1.En
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Form_Load() flag = True Timer1.En
admin
2015-08-28
44
问题
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码:
Dim flag As 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
解析
Form_Load 过程中设定timer事件定时触发,定时时间为1秒;在Timer1_Timer过程中,Shape1形状的尺寸在扩大到原来2倍和恢复原状,然后退出。下一次timer事件触发时继续这个过程。因此,选B)。
转载请注明原文地址:https://kaotiyun.com/show/A9Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件调试的目的是______。
软件文档是软件工程实施中的重要成分,它不仅是软件开发的各阶段的重要依据,而且影响软件的【】。
对用MsgBox显示的消息框,下面______是错的。
以下能够触发文本框Change事件的操作是______。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=0DoUntilx=-1a=InputBox("请输入A的值")
假定在窗体上建立一个通用对话框,其名称为CommonDialogl,用下面的语句可以建立一个对话框:CommonDialogl.Action=1与该语句等价的语句是______。
在进行模块测试时,要为每个被测试的模块另外设计两类模块:驱动模块和承接模块,其中的作用是将测试数据传送给被测试的模块,并显示被测试模块所产生的结果。
下列关于栈的叙述中正确的是______。
在考生文件夹中有一个工程文件execise7.vbp及窗体文件exeeise7.frm。在名为Form1的窗体中已经给出了所有控件,如下图所示。编写适当的事件过程完成以下功能:单击Read按钮,则把考生目录下的in7.txt文件中的一个整数放入Te
树是节点的集合,它的根节点数目是
随机试题
下列经济业务使会计等式两边总额增加的是()
慢性肾衰时,出现哪个管型常提示预后不良
松贝的性状鉴别特征是
人民法院适用普通程序审理的普通施工合同纠纷案件,审理期限为( )。
甲公司和乙公司订立买卖合同,约定4月2日前交货。但到了4月2日,甲公司无法供货,经乙公司催促,甲公司于4月10日才办理铁路托运手续发货。4月11日,货物在运输途中因不可抗力灭失。根据我国合同法的规定,下列表述中正确的是()。
新疆的国家风景名胜区有()。
“看吧,狂风紧紧抱起一层层巨浪,恶狠狠地把它们甩到悬崖上,把这些大块的翡翠摔成尘雾和碎末。”这句中使用的修辞格有()。
田和被列为诸侯是在公元前()年。
试论民法的性质。
在Access中,与关系模型中的术语“域”对应的概念是()。
最新回复
(
0
)