首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Shapel并显示为圆的形状控件(其width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码: Dim r As Single,flag As Integer Private Sub Form
窗体上有一个名称为Shapel并显示为圆的形状控件(其width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码: Dim r As Single,flag As Integer Private Sub Form
admin
2017-04-25
34
问题
窗体上有一个名称为Shapel并显示为圆的形状控件(其width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码:
Dim r As Single,flag As Integer
Private Sub Form Load()
r=Shapel.Width
Timer1.Enabled=True
Timer1.Interval=500
End Sub
Private Sub Timer1_Timer()
Ifflag=0 Then
Shapel.Width=Shapel.Width-10
IfShapel.Width<=100 Then
flag=1
End If
Else
Shapel、Width=Shapel.Width+10
If Shapel.Width>=r Then
flag=0
End If
End If
End Sub
运行程序后产生的结果是
选项
A、圆逐渐缩小,再逐渐增大,然后再逐渐缩小,依此往复
B、圆一直在缩小
C、圆每隔0.5秒向右移动一次
D、圆每隔1秒向下移动一次
答案
A
解析
本题在计时器的Timer事件中,如果flag为0,让圆的宽度逐渐减小,一直到100以下,将flag置为1;如果flag为1,让圆的宽度逐渐增大,一直到大于原来的宽度r则将flag置为0:则圆逐渐缩小,再逐渐增大,然后再逐渐缩小,依此往复。
转载请注明原文地址:https://kaotiyun.com/show/mLGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是______。
下列程序段的执行结果为a=6Fork=1To0 a=a+kNextPrintk;a
在文本框控件中,将Text的内容全部显示为用户所定义的字符的属性是()。
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置并改正错误。
关系数据库中有3种基本操作,将具有共同属性的两个关系中的元组连接到一起,构成新表的操作称为______。
如果在立即窗口中执行以下操作(<CR>是回车键):a=8<CR>b=9<CR>printa>b<CR>则输出结果是______。
设已经在窗体上添加了一个通用对话框控件CommonDialog1,以下正确的语句是()。
窗体上有一个名称为Framel的框架(如图),若要把框架上显示的“Framel”改为汉字“框架”,下面正确的语句是
已知代数式eXSin(30°)2x/(x+y)Lnx,则正确的VisualBasic表达式为()。
代数|3e+lgx+arctgy|对应的VisualBasic表达式是
随机试题
Iaswellasallyourclassmates______readytohelpyou.
A.导管脱出或过深B.喉水肿C.喉痉挛D.插管时呛咳E.勺状软骨脱臼留置气管导管期间常见的并发症的是
风险是银行体系不可消除的外部因素,银行机构正是通过管理和经营风险获得收益。()
下列关于表结法的表述,正确的有()。
()是一种最强烈的冷暖对比,其色彩效果是非常鲜明的。
研究发现,昆虫是通过它们身体上的气孔系统来“呼吸”的。气孔连着气管,而且由上往下又附着更多层的越来越小的气孔,由此把氧气送到全身。在目前大气的氧气含量水平下,气孔系统的总长度已经达到极限;若总长度超过这个极限,供氧的能力就会不足。因此,可以判断,氧气含量的
行政机关拒绝履行判决、裁定的,第一审人民法院可以采取的措施是()。
简述无权代理与表见代理的区别。
下列叙述中正确的是
【21】【33】
最新回复
(
0
)