首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Shape1并显示为圆的形状控件(其Width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码: Dim r As Single,flag As Integer Private Sub Timer1_Time
窗体上有一个名称为Shape1并显示为圆的形状控件(其Width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码: Dim r As Single,flag As Integer Private Sub Timer1_Time
admin
2016-09-19
44
问题
窗体上有一个名称为Shape1并显示为圆的形状控件(其Width和Height属性值相等),一个名称为Timer1的计时器,并有下面程序代码:
Dim r As Single,flag As Integer Private Sub Timer1_Timer()
Private Sub Form_Load() If flag=0 Then
r=Shape1.Width Shape1.Width=Shape1.Width-10
Timer1.Enabled=True If Shape1.Width<=100 Then
Timer1.Interval=500 flag=1
End Sub 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
解析
本题在计时器的Timer事件中,如果flag为0,让圆的宽度逐渐减小,一直到100以下,将flag置为1;如果nag为1,让圆的宽度逐渐增大,一直到大于原来的宽度r则将flag置为0;则圆逐渐缩小,再逐渐增大,然后再逐渐缩小,依此往复。
转载请注明原文地址:https://kaotiyun.com/show/7pLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VB6.0是()应用程序的开发工具。
下面程序运行时,单击窗体后,窗体上显示的结果是()。PrivateSubForm_Click()DimIAsIntegerDimsumAsLongsum=0ForI=10To16
长度为n的顺序存储线性表中,当在任何位置上插入一个元素概率都相等时,插入一个元素所需移动元素的平均个数为______。
关于MDI窗体下列说法正确的是()。
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsInteger x=5 y=7
下列叙述中正确的是()。
在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimstrAsString,nAsIntegerStr=UCas
以下程序的功能是:把父目录下顺序文件smtext1.txt的内容读入内存,并在文本框Text3中显示出来。请选择适合横线处的语句()。PriVateSubCommandlClick()DiminDataAsStrin
下面的程序执行完毕后,组合框中数据项的值是()。PrivateSubForm_Click()Fori=1To6Combo1.AddItemiNexti
在用菜单编辑器设计菜单时,必须输入数据的项目是【】。
随机试题
男性,35岁。急性胆囊炎。该患者的体位是
毫微囊主要应用在
男婴,4个月,冬季出生,因夜惊多汗,烦躁易哭1个月来院门诊,生后母乳喂养,未加辅食。体检:精神尚可,枕秃,枕骨按之有乒乓球感。在此患儿可能的致,病原因中,以下哪项不正确
一般药物干燥温度不宜超过含芳香挥发性成分的药物干燥温度不宜超过
A.限于一名患者的用药B.应当在修改处签名并注明修改日期C.单独开具处方D.分别开具处方,也可以开具一张处方E.每一种药品应当另起一行,每张处方不得超过5种药品每张处方
用可调工料单价法计算工程进度款时,其基本步骤有()。
教师讲解“所以动心忍性,曾益其所不能”中“所以”的词义,另举一例加以说明,下列合适的是()。
“明月出天山,苍茫云海间”是李白的著名诗句,我们根据该诗句可以推断:
所有与甲流患者接触的人都被隔离了,所有被隔离的人都与小王接触过。如果以上命题为真,以下哪个命题也是真的?()
YouwillhearaninterviewwithHarryStyles,theGeneralManagerofFourSeasonsHotelPhiladelphia.Foreachquestion(23-3
最新回复
(
0
)