首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Form_Load() flag=True
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Form_Load() flag=True
admin
2018-10-18
36
问题
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码:
Dim flag As Boolean
Private Sub Form_Load()
flag=True
Timer1.Enabled=True
Timer1.Interval=1000
End Sub
Private Sub Timer 1_Timer()
If flag Then
Shape1.Height=Shape1.Height*2
Shape1.Width=Shape1.Width*2
Else
Shape 1.Height=Shape 1.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/uPFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有以下程序:PrivateSubForm_Click()x=50Fori=1To4y=InputBox("请输入一个整数")y=Val(y)IfyMod
对长度为n的线性表作快速排序,在最坏情况下,比较次数为()。
PrintFormat(1234.56,"###.#")语句的输出结果是()。
窗体上有1个名称为Command1的命令按钮,事件过程及函数过程如下:PrivateSubCommand1_Click()DimmAsStringm=InputBox("请输入字符串")
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是()。
以下关于图片框控件的说法中,错误的是()。
数据库系统的三级模式不包括
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,
以下关系表达式中,其值为True的是( )。
若变量a未事先定义而直接使用(例如:a=0),则变量a的类型是( )。
随机试题
产生表证的主要因素是
A.三唑仑B.美沙酮C.麦角新碱D.苯巴比妥E.地巴唑属于麻醉药品品种的是
甲公司如果起诉,其应当向哪个(些)地方的法院起诉?为什么?假设后来双方经协商达成书面仲裁协议,双方在纠纷发生后达成的书面仲裁协议是否成立?为什么?
建设工程招标投标过程中,银行为建筑工程公司提供的工程保函属于()。
2009年10月,某建筑公司在中国境内发生如下业务:(1)承建甲企业办公楼,合同中约定,甲企业提供电梯,价款800万元。该办公楼10月竣工并一次性结算工程价款11500万元(包括劳动保护费20万元、临时设施费15万元),另外取得提前竣工奖20万元
某企业2012年度通过民政部门向贫困地区捐赠50元,直接向某大学捐款10万元,均在营业外支出中列支。该企业当年实现利润总额400万元,假设不考虑其他纳税调整事项。根据企业所得税法律制度的规定,该企业2012年度应纳税所得额为()万元。
相信市场有效的投资人通常会采取()。
中国政府在日本发行的美元面值的债券被称为()。[上海财经大学2018研]
下列对于用IIS6.0在一个服务器上建立多个网站的描述中,错误的是
关系模型的完整性规则是对关系的某种约束条件,包括实体完整性、______和自定义完整性。
最新回复
(
0
)