Question

vb中怎样让list2的内容list1内容的倒数？

就是说：假如 list1的内容是：
a
b
c
现在我要让list2的内容等于：
c
b
a
我原是这样写的：
dim i As Integer
Dim j As Integer
i = List1.ListCount
For j = i To 0 Step 1
List2.AddItem List1.List(j)
Next j
请指教，多谢（新手又急需）！

Answer 1

i = List1.ListCount
改为
i = List1.ListCount-1
将For循环改为：
For j = i To 0 Step -1
其它不变即可。

Answer 2

Private Sub Command1_Click()
For i = List1.ListCount - 1 To 0 Step -1
List2.AddItem List1.List(i)
Next i
End Sub

Private Sub Form_Load()
List1.AddItem "123"
List1.AddItem "456"
List1.AddItem "789"
End Sub