关于listbox添加项问题........请教各位大侠哈~~~在线等.....问题解决即结帖

[rose_886886]

如何在LISTBOX里

将添加的 新项 永远放在 第一行 ......... 其他的数据依次下移一行



我想到的是 放数组里 重新添加 可是太麻烦了

还请教各位达人哦~~~~~~~~~~~~~~~~

[大王派我去巡山]

Private Sub Command1_Click()
    Dim i As Long
    For i = 1 To 10
        List1.AddItem CStr(i), 0
    Next i
End Sub

[rose_886886]

谢谢大侠哦~~~~~~~~~~~~~~~~~ 工作愉快~~~~~~~~~~~~~~