如图为验证机械能守恒定律的实验打下的纸带，纸带上的点都是连续打下的点．已知打点计时器所用交流电源周期为T，重力加速度为g．量得1、2、3各点到起点O的长度是：h₁，h₂，h₃．已知重锤质量为m，从起点O到2点重锤重力势能减少量为______，动能增加量为______．事实上重锤重力势能的减少量与动能的增加量不会严格相等，主要误差原因是______．（写出一条即可）

窗体如图1所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击“删除”按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能：

Private Sub Command1_Click()
Dim n%, k%
n = Len(Text1. Text)
For k = 0 To List1. ListCount - 1
If Left (List1. List (k), n) = Text1. Text Then
List1. RemoveItem k
End If
Next k
End Sub
在调试时发现，如输入“陈”，可以正确删除所有姓“陈”的项目，但输入“刘”，则只删除了“刘邦”、“刘备”2项，结果如图2所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把For k=0 To List1．Listcount-1改为( )。

A) For k = List1. ListCount - 1 To 0 Step - 1
B) For k = 0 To List1. ListCount
C) For k = 1 To List1. ListCount - 1

D) For k = 1 To List1. ListCount