首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
2020-04-18
45
问题
窗体上有一个名称为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=0Then
Shape1.Width=Shape1.Width-10
If Shape1.Width<=100Then
flag=1
End If
Else
Shape1.Width=Shape1.Width+10
If Shape1.Width>=rThen
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/7eTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面正确使用动态数组的是()。
下面程序计算并输出的是()。PrivateSubCommand1_Click()Num=10:Sum=0DoSum=Sum+Num*Num*NumNum=Num-1LoopUnti
设程序中有如下数组定义和过程调用语句:Dima(10)AsIntegerCallp(a)如下过程定义中,正确的是
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是
下列可作为VisualBasic变量名的是
为了声明一个长度为128个字符的定长字符串变量StrD,以下语句中正确的是
窗体上有一个名称为Commandl的命令按钮,其事件过程如下:PrivateSubCommand1_Click()x=”VisualBasicProgramming”a=Right(x,11):b=Mid(x,7,5):c
以下能够设置控件焦点的方法是
下列关于水平滚动条的叙述中,错误的是
设a=2,b=3,c=4,d=5,下列表达式的值是a>bAndc
随机试题
根据五行生克乘侮规律来推断病情,病情较深重的有:
人的本质()。
Theatmosphereandoceansarenottheonlypartsoftheenvironmentbeingdamaged.Rainforestsarebeingquicklydestroyedasw
男性,52岁,右上腹痛已半年,近半个月出现黄疸、体重下降、食欲减退。既往患胆囊结石已5年。检查:巩膜及全身皮肤黄染,右上腹扪及约6cm×6cm肿块,无移动性浊音。BUS显示胆囊部位有一实质性占位病变,并可见强光团及声影。此病人可能的诊断是
有关我国幼儿教育的性质,错误的描述是()。
坚持集体教育就不能考虑个人情况。()
关于DNA聚合酶作用的叙述有
A、 B、 C、 D、 C
某项目为了修正一个错误而进行了修改。错误修改后,还需要进行_____________以发现这一修改是否引起原本正确运行的代码出错。
SQL语言是具有()的功能。
最新回复
(
0
)