سؤالين عن CheckedListBox1

وووووووووووووووووووووووينكم

أخي الكريم

اقتباس

أريد كود تحديد كل عناصر CheckedListBox1 يعني اعملها select all

        For i = 0 To ch.Items.Count - 1
            ch.SetItemChecked(i, True)
        Next i

أما بالنسبة للطلب الأول لنفترض بأنك تريد حذف جميع العناصر (المحددة) سنقوم بهذا كما يلي:

        With ch
            If .CheckedItems.Count > 0 Then
                For i As Integer = .CheckedItems.Count - 1 To 0 Step -1
                    .Items.Remove(.CheckedItems(i))
                Next
            End If
        End With

على فكرة Ch هو اسم CheckedListBox

أسميته هكذا للاختصار

بالتوفيق

la

مشكوووووووووووور استاذي بصراحة كفيت و وفيت

بس سؤال اريد اطبق الامر الاتي على العناصر المحددة فقط سواء كانت جميع العناصر محددة او بعض منها فقط و هذا هو كود الامر

MSN.SendMail(Me.ListBox1.SelectedItem)

قم بالتعديل على الكود الثانى فى مشاركة الأخ الفاضل m.aljoul واستبدل السطر

.Items.Remove(.CheckedItems(i))

بالسطر

MSN.SendMail(.CheckedItems(i))

ما شاء الله روووووووووووووووووووووووووووووووووعة

ايش هذا الابداع اخي الغالي ادامكم الله ذخرا لنا

سؤال اخر اخي العزيز هذا الكود

MSN.SendMail(.CheckedItems(i))

لارسال رساله لكل الاعضاء فعندما قمت بتنفيذه اظهر لي كل ايميل في صفحة ارسال رسالة ايميل منفصله

انا اريده يرسل نفس الرساله للجميع فبمجرد الضغط على زر ارسال ترسل الرسالة للجميع مرة واحدة

و لكم مني وافر التحية

السلام عليكم

تحتاج الى تجميع الايميلات والفصل بينهم بفاصلة منقوطة

dim x as string
  With ch
            If .CheckedItems.Count > 0 Then
                For i As Integer = .CheckedItems.Count - 1 To 0 Step -1
                 x =x & .CheckedItems(i) & ";"
                Next
            End If
        End With
MSN.SendMail(x)

صديقي ما نفع الكود للاسف لانه برنامج متصل ببريد الهوتميل يعني لنا اضغط على زر ارسال الرساله للجميع يفتحلي صفحة ارسال الرساله في موقع الهوت ميل

أخي الكريم

ما رأيك بأن تضع نسخة من الكود هنا وسنساعدك إن شاء الله

بالتوفيق

طيب اخي هذا هو البرنامج بالمرفقات

MSN Control.rar

ووووووووووووووووووووووووووووووووووووووووووينكم

,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,

upppppppppppppppppppppppppppppppp