单选题窗体上有一个名为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 If
End Sub
程序运行时，选中一个列表项，然后单击Command1按钮，则产生的结果是______。

A、若选中的不是最前面的列表项，则选中的列表项与它前一个列表项互换位置
B、选中的列表项与它前面的列表项互换位置
C、若选中的不是最后面的列表项，则选中的列表项与它后一个列表项互换位置
D、选中的列表项与它后面的列表项互换位置

【正确答案】 A

【答案解析】[解析] 当单击Command1按钮后，List1列表框中被选中项的索引值赋给变量n，如果被选中项不为空也不是第1项时，将选中项的项目文字赋值给变量ch，用选中项的上面一项的文字替换选中项的文字，再把变量ch中的文字替换成选中项上面一项的文字，简单说就是选中项和它上面一项的位置进行交换。因此A选项的说法正确。