ايران ويج

دوستان من يه سوال دارم
من تو يه ليست باكس چند تا اسم دارم كه مي خوام يه عملياتي روي همه او نا اما به صورت جدا انجام بشه
مثلا من يه بوتر دارم مي سازم و مي خوام همه ايتم هاي داخل ليست باكس رو بوت كنم
مثلا اول نفر اول بعد دوم و ...

جواب بدين

منظورتو بیشتر توضیح میدی؟
میخوای بین آیتم ها حرکت کنی؟

بايد توي تكست باكس يك چيزي باشه كه اسامي رو از هم جدا كنه مثلا فاصله يا خط و...
شما ميتوني با استفاده از همون فاصله ها هر كدومو جدا جدا پردازش كني

البته اگه منظورت همين باشه

سلام
منظورتو متوجه شدم, شما باید از دستور Split استفاده کنید. با استفاده از این دستور تمام ایتم ها با یه مشخصه خاص در یه متن از هم جدا میشن و داخل یه آرایه ریخته میشن این مثال رو ببین
Dim a As String
Dim b() As String
a = "a - b - c - d "
b = Split(a, "-")
For i = LBound(b) To UBound(b)
MsgBox b(i)
Next i

اقاي pswin مثل ps خودت كه ايميل مي فرسته

منظورت اینه که آیتم های یه لیست باکس رو بگیره و اونها رو به شکل یه رشته در بیاره؟
خوب برای این کار میتونی از دستور join استفاده کنی این دستور آیتمهای یک آرایه رو به هم و با یک جدا کننده به هم می چسبونه و یک رشته بیرون میده

اما اگر میخوای بدونی چه آیتم هایی داخل لیست باکس هستن میتونی از کد زیر استفاده کنی؟

For i = 0 To List1.ListCount -1
MsgBox List1.List(i)
Next i

با دستور List1.AddItem میتونی یک آیتم جدید به لیست باکس اضافه کنی

چرا كسي منظورم را نمي فهمه :((

ببين من يه ليست باكس دارم كه مثلا تو اون 35 تا اي دي هست
مي خوام بوت پكت هام به اينا ارسال بشه
براي تكست باكس اين را مي زنن text1.text ولي براي ليست اين رو مي زنم list1.list
تا وقتي كه يه اي دي توش بوت مي شه ولي اگه 2 تا بشه دي گه نمي تونه ار سال كنه

بابا جون از لیست استفاده کنی بهتر نیست ؟

از نظر من لیست خیلی بهتره برای کاره شما

حامد . هایده

منظورت اینه که میخوای تمام ID هایی که در لیست هست رو یجا Boot کنی
خوب یجا که شدنی نیست اما همونجوری که دوستان هم گفتن

شما در خط دوم این رو دارید
که این همون ID های شما هستند و شما باید مثلا این کار رو بکنی

توی اون حلقه باید یک Delay یک ثانیه ای بزاری تا مشکلی پیش نیاد
بعد هم مثلا از تابعت اینجوری استفاده کن