首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
24
问题
窗体上有一个名称为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://jikaoti.com/ti/kWm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
用来设置文字字体是否为粗体的属性是( )。
在名称为Frame1的框架中,有两个名称分别为op1、op2的单选按钮,标题分别为"单程"、"往返",如图所示。以下叙述中,正确的是( )。
要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect属性设置为
用语句Open"C:\teac.txt"ForInputAs#1打开文件后,就可以编程序
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
随机试题
管理与经营的联系与区别:
我国最早的一部国别体史书是()
A、可抗血小板聚集和抗血栓形成B、主要用于肝素过量引起的出血C、直接激活纤溶酶原转变为纤溶酶,起到溶血栓作用D、主要用于恶性贫血和巨幼红细胞性贫血E、用于香豆素类引起自发性出血的解救尿激酶的作用
患者,22岁,自初潮后表现为月经开始前1天腹痛,时有恶心,子宫、附件正常。最可能是
男性,72岁,排便时突然跌倒,意识丧失,呼吸断续,有陈旧心肌梗死和糖尿病病史,无高血压病史,诊断为心脏骤停。该患者既往超声心动图检查未发现异常,其心脏骤停最可能的病因是
统计调查项目包括()、部门统计调查项目和地方统计调查项目。
四川事业单位的特设岗位不受本单位岗位总量、最高等级和结构比例限制,在完成工作任务后,按照岗位核准权限予以核销。()
教师:编辑()
【B1】【B8】
SlowDownYourPaceofLife1.PutyourphoneawayAvoiddistractions:【T1】______,emails,FacebookupdatesPutyourphone【T2】___
最新回复
(
0
)