窗体上有一个名为List1的列表框和一个名为Command1的命令按钮，并有下面的事件过程：Private Sub Command1_Click()　　n%＝List1.ListIndex　　If n>0 Then　　　　ch$＝List1.List(n)　　　　List1.List(n)＝List1.List(n－1)　　　　List1.List(n－1)＝ch　　End IfEnd Sub程序运行时，选中1个列表项，然后单击Command1按钮，则产生的结果是(　　)。

单项选择题要求在程序运行时，如果按住鼠标左键不放而移动鼠标，鼠标的位置坐标同步显示在窗体右上角的标签(名称为Label1)中，如右图所示，放开鼠标左键后，停止同步显示。下面可以实现此功能的程序是( )。

单项选择题窗体上有一个名称为Label1的标签；一个名称为Timer1的计时器，其Enabled和Interval属性分别为True和1000。编写如下程序：Dim n As IntegerPrivate Sub Timer1_Timer() ch＝Chr(n＋Asc( A )) Label1.Caption＝ch n＝n＋1 n＝n Mod 4End Sub运行程序，将在标签中( )。