السلام عليكم
عندي معضله حيرتني
عندي مجموعتين الأولى عباره عن RadiobuttonList تحتوي على items (a,w,e,r
و المجوعه الثاني عباره عن CheckBoxList وتحتوي على نفس العناصر وقررت أظافتها يدويا
Dim a As String = RadioButtonList1.Text
If IsPostBack Then
With CheckBoxList1.Items
.Clear()
.Add(New ListItem("a", "1"))
.Add("w")
.Add("e")
.Add("r")
.Remove(a)
End With
End If
و RadioButtonList1
If Not IsPostBack Then
With Me.RadioButtonList1.Items
.Clear()
.Add("a")
.Add("w")
.Add("e")
.Add("r")
End With
End If
ألية عمل عند أختياري عنصر من المجمعوعه الأولى يلتغي العنصر المختار من المجموعه الثانيه بمعنى( لا يجوز أختيار نس العنصر من المجموعتين)
وأستخدمت لهذا الغرض
.Remove(a)
و
.Clear()
لعدم تكرار items لكثر من مره في حالت load page
لكن المشكل في زر
Dim i As Integer
Dim M As Integer = 0
For i = 0 To CheckBoxList1.Items.Count - 1
If CheckBoxList1.Items(i).Selected Then
M = M + 1
End If
Next
If M <= 1 Then
MsgBox(" أختر عنصر")
ElseIf M > 2 Then
MsgBox("لقد أخترت أكثر من عنصيرين")
End If
Exit Subعند الضغط على الزر
وفي هذا السطر
CheckBoxList1.Items(i).Selected
يظهر false أي كأني لم أختر من شك بوكس
لحظة أنه يقراء الكود الذي كتبته أول الصفحة لذلك يظهر false
بسبب هذا
.Clear()
وأذا مسحته يشتغل وبذلك ينتفي الغرض من كتابته
من لديه الحل لمشكلتي
أو
لديه أقتراح بديل لكن بنفس ألية العمل أي المجموعتين
أكون له من الشاكرين


