窗体的左右两端各有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运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是( )。
- A.把计时器的Interval属性设置为1
- B.把For k＝Line1.X1 To Line2.X1 Step 100 和 Next k两行删除
- C.把For k＝Line1.X1 To Line2.X1 Step 100 改为 For k＝Line2.X1 To Line1.X1 Step 100
- D.把If Shape1.Left＋Shape1.Width<Line2.X1 Then 改为 If Shape1.Left<Line2.X1 Then
热度🔥301
参考答案：B
解析：
【解析】在计时器事件中不应再设置步长为100的For循环，应该把For循环去掉，只留下循环体的语句，计时器每秒激发一次，每次判断小球是否移到Line2处，不到就改变自己的Left值即继续移动。因此B正确。
【解析】在计时器事件中不应再设置步长为100的For循环，应该把For循环去掉，只留下循环体的语句，计时器每秒激发一次，每次判断小球是否移到Line2处，不到就改变自己的Left值即继续移动。因此B正确。
复制题目向AI提问
为实现上述功能，某人把计时器的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运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是( )。
A.把计时器的Interval属性设置为1
B.把For k＝Line1.X1 To Line2.X1 Step 100 和 Next k两行删除
C.把For k＝Line1.X1 To Line2.X1 Step 100 改为 For k＝Line2.X1 To Line1.X1 Step 100
D.把If Shape1.Left＋Shape1.Width<Line2.X1 Then 改为 If Shape1.Left<Line2.X1 Then
答案：B。
解析：【解析】在计时器事件中不应再设置步长为100的For循环，应该把For循环去掉，只留下循环体的语句，计时器每秒激发一次，每次判断小球是否移到Line2处，不到就改变自己的Left值即继续移动。因此B正确。">
content_copy
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
有以下程序
#include
main()
{ int c,d;
c = 10 | 5; d = 10 + 5;
printf("%d,%d\n", c, d);
}
程序的运行结果是
设在SQL Server 2008某数据库中有销售表（商品号，销售时间，销售数量，销售价格），其中商品号的类型为char(6)，销售价格的类型为int。现要定义统计指定商品销售总价的标量函数。有下列定义该标量函数的语句
Ⅰ．Create FUNCTION dbo.GetTotal(@GoodID char(6))
Returns int AS
BEGIN
Return(SELECT SUM(销售价格) FROM 销售表 WHERE 商品号 = @GoodID)
END
Ⅱ．Create FUNCTION dbo.GetTotal(@GoodID char(6))
Returns int AS
BEGIN
Returns(SELECT SUM(销售价格) FROM 销售表 WHERE 商品号 = @GoodID)
END
Ⅲ．Create FUNCTION dbo.GetTotal(@GoodID char(6))
Returns int
BEGIN
Return(SELECT SUM(销售价格) FROM 销售表 WHERE 商品号 = @GoodID)
END
Ⅳ．Create FUNCTION dbo.GetTotal(@GoodID char(6))
Returns int
Returns(SELECT SUM(销售价格) FROM 销售表 WHERE 商品号 = @GoodID)
上述语句中，正确的是（）
在文件系统中，文件的逻辑块与存储介质上物理块存放顺序一致的物理结构是
按不同人员的工作内容来分类软件过程，组织过程包括
从用户的观点看，操作系统是（ ）。
