مشكلة أثناء محاولة استرداد البيانات من مربع

Question

وأنا أحاول أن تنفيذ التعليمات البرمجية أدناه إلى قائمة حدد العنصر في مربع

وللجسم من البريد

 Dim CheckedValues As String
                For Each item In txt_panview0_ddinput1.Items
                    If item.checked Then
                        checkedValues = checkedValues & item.selectedValue

                    End If
                Next
                If Not String.IsNullOrEmpty(checkedValues) Then
                    checkedValues = checkedValues.Substring(1)
                End If


                tempCollector = tempCollector + "<br>" + "Area Name" + ": " + checkedValues

ولكن أنا على الحصول على الخطأ التالي ..

System.MissingMemberException: Public member 'checked' on type 'ListItem' not found. 
at Microsoft.VisualBasic.CompilerServices.Symbols.Container.GetMembers(String& MemberName, 
Boolean ReportErrors) at Microsoft.VisualBasic.CompilerServices.NewLateBinding.
LateGet(Object Instance, Type Type, String MemberName, Object[] Arguments, String[] ArgumentNames, Type[] 
TypeArguments, Boolean[] CopyBack) at WebApplication1._Default.collectEmailBodyText() 
in C:\UseFormCode\UseFormEnhWorking\Default.aspx.vb:line 271 

الرجاء المساعدة

Answer 1

<الإضراب> التلبيس كل عنصر في تكرار لCheckBox قبل التحقق إذا هو التحقق من ذلك:

<الإضراب>

For Each item In txt_panview0_ddinput1.Items
     dim c as CheckBox = Ctype(item.Value, CheckBox)
     If c.checked Then
         checkedValues = checkedValues & item.selectedValue
    End If
Next

<الإضراب>

لتمكين اختيار قيم متعددة، قم بتعيين الخاصية SelectionMode من ListBox إلى Multiple:

<asp:ListBox ID="ListBox1" runat="server" SelectionMode="Multiple"></asp:ListBox>

وبعد ذلك أعاد فوق القيم المحددة، استخدم ما يلي:

For Each item as ListItem In txt_panview0_ddinput1.Items
         If item.Selected Then
             CheckedValues = CheckedValues & item.Value
        End If
Next

PS أنا قليلا الصدئة على جملة VB.Net حتى قانون بلدي قد لا يكون مثاليا نحويا