柠檬试题库
search
首页
计算机
公务员
驾照
关于
shape
窗体上有一个名称为Timer1的计时器控件，一个名称为Shape1的形状控件，其Shape属性值为3(Circle)。编写程序如下：Private Sub Form_Load() Shape1.Top＝0 Timer1.Interval＝100End SubPrivate Sub Timer1_Timer() Static x As Integer Shape1.Top＝Shape1.Top＋100 x＝x＋1 If x Mod 10＝0 Then Shape1.Top＝0 End IfEnd Sub以下关于上述程序的叙述中，错误的是( )。
窗体的左右两端各有1条直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Line1直线上(见图)；另有1个名称为Timer1的计时器控件，其Enabled属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。
为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：Private Sub Timer1_Timer() For k＝Line1.X1 To Line2.X1 Step 100 If Shape1.Left＋Shape1.Width<Line2.X1 Then Shape1.Left＝Shape1.Left＋100 End If Next kEnd Sub运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是( )。
随机标签
算法
dcba
导致
等价
数组
为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：Private Sub Timer1_Timer() For k＝Line1.X1 To Line2.X1 Step 100 If Shape1.Left＋Shape1.Width<Line2.X1 Then Shape1.Left＝Shape1.Left＋100 End If Next kEnd Sub运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是( )。