首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
19
问题
窗体上有一个名称为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
阅读以下程序:PrivateSubForm_Click()Dimk,n,mAsIntegern=10m=1k=1DoWhilek<=nm=m+2k=k+1LoopPrintm
以下定义数组或给数组元素赋值的语句中,正确的是()。
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程:PrivateSubCommandl_click()CommonDialogl.Friter="AllFiles(*.*)|*.*
任何控件都具有()属性。
保存一个工程至少应保存两个文件,这两个文件分别是
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger。则以下叙述中正确的是
将E-R图转换到关系模式时,实体与实体间的联系可以表示成()。
两个或两个以上模块之间联系的紧密程度称为()。
随机试题
某台双水内冷发电机,其定子线电压UL为13.8kV,线电流IL为6150A,若负载的功率因数由0.85降到0.6时,求该发电机有功功率和无功功率任何变化?
某班有两位学生,学生甲热情直率、精力旺盛、口快心直、办事干脆,但容易急躁、情绪易激动,比较武断。学生乙孤僻敏感、善于思考、行动迟缓,情绪体验深刻又细腻、办事稳妥,不大合群。问题:如何根据这两位学生气质类型的特征进行教育?
某砖混结构典型工程,其建筑体积为600m3,毛石带型基础工程量为72m3。根据概算定额,10m3毛石带型基础需砌石工7.0工日,该单位工程无其他砌石工,则1000m3类似建筑工程需砌石工为()工日。
商业银行获得个人客户信用记录的途径不包括()。
导游服务()。
在教育过程中,采用下列哪些措施能有效培养学生的主动性?()
所有来自澳大利亚的留学生,都住在东区留学生公寓,所有住在东区留学生公寓内的学生,都必须参加今年的国际交流会;有些来自澳大利亚的留学生加入了汉语俱乐部;有些土木工程专业的学生也加入了汉语俱乐部;所有土木工程专业的学生都没有参加今年的国际交流会。由此不能推出
设A是正定矩阵,B是实对称矩阵,证明AB相似于对角矩阵.
Studythefollowingphotocarefullyandwriteanessayof160-200wordsinwhichyoushould1.describethephotobriefly,ande
在数据仓库环境中,粒度是一个重要的设计问题。粒度越【15】,细节程度越高,能回答的查询就越多,数据量就比较大。
最新回复
(
0
)