مشکل با listbox برای اضافه کردن رشته با index دلخواه

[momo1366]

سلام خدمت تمام دوستان عزیز


من یک مشکل با listbox دارم و اوون در بکارگیری متد additem هست..... چیز خیلی ساده ایه ولی به من ارور کامپایل میده.


من قصد دارم با زدن یک دکمه رشته ای که در یک textbox توسط کاربر نوشته میشه به listbox اضافه بشه ولی قصد دارم index رو خود کاربر وارد بکنه.


یعنی اینطور نباشه که خودش رشته رو به انتهای listbox اضافه کنه ... بلکه هر رشته ای یه index دلخواه داشته باشه.... این برای من خیلی مهمه... میخواستم ببینم اصلا شدنی هست؟
چرا به من ارور میده و میگه ازم انتظار علامت مساوی داره؟ آیا باید تابع یا فایل خاصی رو فراخوانی بکنم؟
ممنون میشم اگر جواب بدید.... دستتون درد نکنه

[parselearn]

Private Sub Command1_Click()
List1.List(2) = Text1.Text
End Sub

Private Sub Form_Load()
List1.AddItem 1
List1.AddItem 2
List1.AddItem 4
List1.AddItem 3
End Sub