نمایش آیتم های یک لیست باکس

[امیر رضا]

لطفا در خصوص نمایش آیتم های یک لیست باکس در کادر پیغام راهنمایی کنید من می خوام هر بار یک آیتم از لیت خونده بشه و کاری انجام بشه مثلا دکمه ای کلیک بشه اینو ببینید اشکالمو بگید

Dim i As Integer
For i = 1 To ListBox2.ListCount - 1
TextBox1.Text = ListBox2.Text
ListBox2.Selected(i) = True
CommandButton5 = True
 
Next

میخوام بعد اینکه عملیات پشت CommandButton5 من انجام شد رکورد بعدی لیست باکس خونده بشه و بهمین ترتیب الی آخر


با تشکر

[alieddy0]

با سلام
متاسفانه بنده متوجه منظورتون نشدم.اگه میشه خودتون یا دوستانی که متوجه شدن بیشتر توضیح بدین

[امين اسماعيلي]

با درود منم زیاد متوجه نشدم اما خلال اون چیزی که گتی دیدم که میخوای با کد کدها ی یه کلید دیگرو اجرا کنی خوب دو تا کد من برات مینوسم اجرا کن

 Me.CommandButton1.SetFocus
    SendKeys "{Enter}"

یکی دیگه

Call CommandButton1_Click

هر دوشون باید یه جور عمل کنن

[امیر رضا]

منظور اصلیم اینه که بخوام تمام آیتم های لیست باکس رو دونه بدونه نمایش بدم یه ایندکسهای یک آرایه رو دونه دونه نمایش بدم

[امين اسماعيلي]

با درود
میخوای ایتم های لیست باکس هر چی توش بود کجا نشون بده

خودش خودکار انتخاب بشه و تو مسیج باکس بیاد . اینه منظورت . بعد برای ایونت یک باتتن بزاری . یعنی با اجرای یک باتن این اجرا بشه

[امیر رضا]

با درود
میخوای ایتم های لیست باکس هر چی توش بود کجا نشون بده

خودش خودکار انتخاب بشه و تو مسیج باکس بیاد . اینه منظورت . بعد برای ایونت یک باتتن بزاری . یعنی با اجرای یک باتن این اجرا بشه

بله مهندس توی پست دیگه جوابو دادید از شماخیلی ممنونم