当前位置: X题卡 > 所有题目 > 题目详情

窗体的左右两端各有1直线,名称分别为Line1、Line2;名称为Shape1的圆靠在左边的Linel直线上(见图);另有1个名称为Timer1的计时器控件,其Enabled属性值是True。要求程序...

查看本题答案

你可能感兴趣的试题

把计时器的Interval属性设置为1  把For k=line1.X1 To Line2.X1 Step 100和Next k两行删除  把For k=Line1.X1 To Line2.X1Step 100改为For k=Line2.X1 To Line1.X1 Step 100  把If Shape1.Left+Shepe1.Width  
把计时器的Interval属性设置为100  把For k=Line1.X1 To Line2.X1 Step 100和Next k两行删除  把If Shape1.Left+Shape1.Width<Line2.X1 Then改为If Shape1.Left<Line2.X1 Then  把For k=Line1.X1 To Line2.X1 Step 100改为For k=Line2.X1 To Line1.X1 Step  
把计时器的Interval属性设置为1  把For k=lind1.X1 To Line2.X1 Step 100和Next k两行删除  把For k=Line1.X1 To Line2.X1 Step 100改为For k=Line2.X1 To Line1.X1 Step 100  把If Shape1.Left+Shepe1.Width<Line2.X1 Then改为If Shape1.Left<Line2.X1 Then  
把计时器的Interval属性设置为1  把For k=Line1.X1 To Line2.X1 Step 100和Next k两行删除  把For k=Line1.X1 To Line2.X1 Step 100改为For k=Line2.X1 To Line1.X1 Step 100  把If Shape1.Left+Shape1.Width<Line2.X1 Then改为If Shape1.Left<Line2.X1 Then  
把计时器的Interval属性设置为1  把For k=Line1. X1 To Line2. X1 Step 100和Next k两行删除  把For k=Line1. X1 To Line2. X1 Step 100改为For k=Line2. X1 To Line1. X1 Step 100  把If Shape1. Left+Shape1. Width<Line2. X1 Then改为If Shape1. Left<Line2. X1 Then  

热门试题

更多