首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
2015-10-23
39
问题
窗体上有一个名称为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/IDLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序的功能是找出给定的10个数中最大的一个数,最后输出这个数以及它在原来10个数中的位置。请在下划线处填入适当的内容,将程序补充完整。OptionBase1PrivateSubForm_Cfick()DimX
3下列语句中正确的是()。
程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是()。
假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项失效(变灰),应使用的语句为()。
当一个对象(如窗体或图片框)被移动或改变大小之后,或当一个覆盖该对象的窗体被移开之后,如果要保持该对象上所画图形的完整性,可以选择触发()事件来完成图形的重画工作。
下列语句正确的是
下述关于数据库系统的叙述中正确的是______。
下列叙述中,不属于测试的特征的是______。
设有语句:Open"d:\Test.txt"ForOutputAs#1,以下叙述中错误的是()。
耦合和内聚是评价模块独立性的两个主要标准,其中______反映了模块内各成分之间的联系。
随机试题
Americansbelievenoonestandsstill.Ifyouarenotmovingahead,youarefallingbehind.Thisattituderesultsinanationof
商业银行可接受的抵押财产不包括()
个人所得税的纳税期限可以是()。
拍卖:委托人将物品委托专门机构竞价销售,专门机构在完成委托义务后获得报酬的行为。以下属于拍卖行为的是()
孙中山就任中华民国临时大总统的法律依据是()。(2011年单选34)
窗体上有1个水平滚动条,其Min、Max属性的值被分别设置为100、0。下面的叙述中正确的是()。
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
要在Web浏览器中查看某一电子商务公司的主页,应知道()。
Teachersneedtobeawareoftheemotional,intellectual,andphysicalchangesthatyoungadultsexperience.Andtheyalsoneed
Idon’tthinkthosecurtains______verywellwiththewallpaper.
最新回复
(
0
)