首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Form_Load() flag=True Timer1.Enabled=True Timer1.Interval
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Form_Load() flag=True Timer1.Enabled=True Timer1.Interval
admin
2016-12-13
48
问题
窗体上有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()
Ifflag 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
解析
在计时器事件中会判断窗体级变量flag的值,如果为真则形状尺寸扩大一倍,否则缩小到一半。由于第一次开始计时器事件的时候flag的值为True,所以首先会将形状扩大一倍,然后第二次计时器事件将形状恢复原状。
转载请注明原文地址:https://kaotiyun.com/show/bnGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl,编写下列程序:DimYAsIntegerPrivateSubCommandlClick()DimXAsIntegerx=2Text1.Tex
没有数组定义语句:Dima(5)AsInteger,Listl为列表框控件。下列给数组元素赋值的语句错误的是()。
下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数,打印其中是7的倍数的数,并求它们的总和,请填空。SubTOF()RandomizeDimSAsDoubleDima(10
没有数组定义语句:Dima(5)AsInteger,Listl为列表框控件。下列给数组元素赋值的语句错误的是()。
窗体上有从左到右4个单选按钮组成的控件数组Optl,下标从0开始。程序运行时,单击命令按钮“选择”(名称为Commandl),则在标签Labell中显示所选中的信息,如图所示。以下是完成上述功能的程序,请填空。PrivateSubCommandl
以下关于文件及相关操作的叙述中错误的是()。
下列有关子菜单的说法中,错误的是()
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
随机试题
关于肿瘤免疫的正确描述是
川芎的分泌组织为人参伪品山莴苣的分泌组织为
下列有关人民检察院的拘留权的说法,正确的是哪项?
人身保险合同中由投保人指定的,在保险事故发生后享有保险赔偿与保险金请求权的人是()。
依据刑法和有关司法解释规定,盗窃罪的客观行为表现为()。
户籍管理工作主要有()
2007~2010年,深圳市企业总数增长率最高的是()。
2012年某市开展了市民阅读情况调查。调查采取随机抽样方式,访问了本市12周岁以上的1000名市民。调查显示,多数受访者保持每天阅读的良好习惯。其中,阅读时间在1~2小时的为44.8%,2~3小时的为11.6%,3小时以上的为7.5%。
请根据题目要求,完成下列操作:某模拟网站的主页地址是:HTTP://LOCALHOST:65531/ExamWeb/new2017/index.html,打开此主页,浏览“杜甫”页面,查找“代表作”的页面内容并将它以文本文件的格式保存到考生文件夹下,命
WhatdoestheManMean?
最新回复
(
0
)