Πρόβλημα ενώ προσπαθεί να ανακτήσει δεδομένα από το πλαίσιο ελέγχου

ψήφοι
1

Είμαι προσπαθεί να εκτελέσει τον παρακάτω κώδικα στη λίστα της επιλογής στοιχείο σε μια κουτάκι

στο σώμα του μηνύματος

 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 

Παρακαλώ βοηθήστε

Δημοσιεύθηκε 30/07/2009 στις 15:13
πηγή χρήστη
Σε άλλες γλώσσες...                            


1 απαντήσεις

ψήφοι
1

Typecast κάθε στοιχείο στην επανάληψη σε ένα 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 σύνταξη, ώστε κωδικό μου μπορεί να μην είναι συντακτικά τέλεια

Απαντήθηκε 30/07/2009 στις 15:17
πηγή χρήστη

Cookies help us deliver our services. By using our services, you agree to our use of cookies. Learn more