首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Shape1并显示为圆的形状控件(其Width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码: Dim r As Single, flag As Integer Private Sub Form_Load()
窗体上有一个名称为Shape1并显示为圆的形状控件(其Width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码: Dim r As Single, flag As Integer Private Sub Form_Load()
admin
2018-12-20
50
问题
窗体上有一个名称为Shape1并显示为圆的形状控件(其Width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码:
Dim r As Single, flag As Integer
Private Sub Form_Load()
r = Shape1.Width
Timer1.Enabled = True
Timer1.Interval = 500
End Sub
Private Sub Timer1_Timer()
If flag = 0 Then
Shape1.Width = Shape1.Width - 10
If Shape1.Width <= 100 Then
flag = 1
End If
Else
Shape1.Width = Shape1.Width + 10
If Shape1.Width >= r Then
flag = 0
End If
End If
End Sub
运行程序后产生的结果是
选项
A、圆逐渐缩小,再逐渐增大,然后再逐渐缩小,依此往复
B、圆一直在缩小
C、圆每隔0.5秒向右移动一次
D、圆每隔1秒向下移动一次
答案
A
解析
Form_Load 过程中设定timer事件定时触发;在Timer1_Timer过程中,圆圈先变小后变大,然后退出。下一次timer事件触发时继续这个过程。因此,选A)。
转载请注明原文地址:https://kaotiyun.com/show/IjFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
运行如下程序PrivateSubCommand1_Click() Dima(5,5)AsInteger Fori=1To5 Forj=1To4 a(i,j)=i*2+j Ifa(i,
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是( )。
在名称为Frame1的框架中,有两个名称分别为op1、op2的单选按钮,标题分别为"单程"、"往返",如图所示。以下叙述中,正确的是( )。
阅读程序:OptionBase1PrivateSubForm_Click()DimArr(3,3)AsIntegerFori=1To3Forj=1To3
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dimn()AsIntegerDima,bAsIntegera=Inpu
如果把文本框的Enabled属性设置为False并运行程序,则以下叙述中正确的是
假定有如下的程序段:DimintVarAsIntegerintvar=TruePrintintVar则输出结果是
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
随机试题
()对调节体内糖代谢乃至热能代谢过程具有重要作用,缺乏后容易患脚气病。
我国农村养老保险中投保人领取养老保险金的保证期为()
某大型运输公司下设陆运事业部和水运事业部,分别从事陆运和水运业务。2014年陆运事业部的车辆资产如下:(1)年初拥有整备质量5吨的货车26辆;整备质量4吨的挂车10辆。(2)因业务扩张需要,2014年2月进口11辆1.6升排气量的高档小
固定资产净残值率一般按固定资产原值的()确定。
幼儿记忆能力的强弱很大程度上在于记忆方法的运用。()
2009年,我国973计划(含重大科学研究计划)新立和在研项目共547,其中新立项目123项,在研项目424项。国家财政共投入26亿元。2009年我国973计划(含重大科学研究计划)中,有几个领域的投入经费超过2亿元?()
一架战斗机从甲机场匀速开往乙机场,如果速度提高25%,可比原定时间提前12分钟到达,如果以原定速度飞行600千米后,再将速度提高三分之一,可以提前5分钟到达。那么甲乙两机场的距离是()千米。
表单的【】是对象能够执行的、完成相应任务的操作命令代码的集合。
中国菜讲究色香味,这都是说的菜本身,倘若再有个好名字,无形之中就抬高了身价。比方说“贵妃鸡”“东坡肉”,这类菜名本身就容易让人产生好感。所以有修养的烹饪大师,在给自己创造的新菜起名时格外注意它的文化内涵。至于菜是不是好吃,那就是另一回事了。东北菜
Whowillprobablyreadthispage?Thosewhowantto______inAustraliaandNewZealand.WhatinformationdoesAustralianEng
最新回复
(
0
)