首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
30
问题
窗体上有一个名称为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全国计算机二级
相关试题推荐
用来没置文本框有无滚动条的属性是
为了使一个窗体从屏幕消失但仍在内存中,所使用的方法或语句为______。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntilnu
窗体上有Commandl、Command2两个命令按钮。现编写以下程序:OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCommandl_Click()m=InputBox(”请输入一个正
下列程序段的运行结果是:PrivateSubCommand1_Click()DimnASIntegerI=21:n=3dowhileI>nI=I-nLoopPrintIEn
关于变量作用域,下列叙述中错误的是()。
完全不考虑程序的内部结构和内部特征,而只是根据程序功能导出测试用例的测试方法是______。
在窗体上画三个单选按钮,组成一个名为chkOption的控件数组。用于标识各个控件数组元素的参数是()。
滚动条的最小值属性是______,最大值属性是______。
设某循环队列的容量为50,头指针front=5(指向队头元素的前一位置),尾指针rear=29(指向队尾元素),则该循环队列中共有【】个元素。
随机试题
国外最早的教育著作是()教育家()的《论演说家的教育》,也叫《()》。
下列关于细胞冻存及复苏过程的描述错误的是
确诊风湿病的依据是()。
下列工程项目中无须办理施工许可证的是()。
商业银行开展个人理财业务有下列()情形之一的,由银行业监督管理机构依据《银行业监督管理法》的规定实施处罚。
下列各项中,工业企业通过“其他应付款”科目核算的是()。
【2014年安徽.判断】教育现代化就是指学校教育设备和信息载体的现代化。()
在采用收取手续费方式委托代销商品时,委托方确认商品销售收入的时点为()。
在VisualFoxPro中,将只能在建立它的模块中使用的内存变量称为【】。
在进行逻辑设计时,将E-R图中实体之间联系转换为关系数据库的()。
最新回复
(
0
)