Visualizzazione dei risultati da 1 a 5 su 5
  1. #1

    Recuperare valori da listbox

    Scusate ragazzi cosa c'è di sbagliato inquesto codice?

    codice:
                Dim item As ListItem
                Dim valore As String
    
                For Each item In LstDestinatari.Items
                    If item.Selected Then
                        valore = valore & item.Text & "; "
    
                    End If
                Next
    non riesco a recuperare valore.

    Grazie

  2. #2
    mi dà questo errore:

    Indice oltre i limiti della matrice

  3. #3
    Utente di HTML.it L'avatar di pietro09
    Registrato dal
    Jan 2002
    Messaggi
    10,116
    :master: guarda se questo funziona

    codice:
        '-------------------------------------------------------------------
        'Restituisce una collezione di ListItem selezionati di un ListControl
        'esempio:
        'Dim vli As List(Of ListItem) = ItemSelezionati(Me.ListBox1)
        'For Each LI As ListItem In vli
        '    PrintLn(LI.Text, LI.Value)
        'Next
        '-------------------------------------------------------------------
        Public Function ItemSelezionati(ByVal ListBox As ListControl) As List(Of ListItem)
            Dim vli As New List(Of ListItem)
            Dim LI As ListItem
            For Each LI In ListBox.Items
                If LI.Selected Then
                    vli.Add(LI)
                End If
            Next
            Return vli
        End Function
    Pietro

  4. #4
    pietro mi dispiace ma non va...
    ma la cosa chemi fa incavolare è che questo stesso e identico codice su di un altro programma funziona!!!!!

    Cioè questo è il Listbox:

    codice:
    <asp:ListBox ID="LstDestinatari" runat="server" SelectionMode=Multiple 
                        DataTextField="nome_completo" DataValueField="id_utenti"></asp:ListBox>
    e questo il codice:

    codice:
    Dim item As ListItem
                Dim dest As String
    
                For Each item In LstDestinatari.Items
                    If item.Selected Then
                        dest = dest + item.Text + "; "
    
                    End If
                Next
                lblprova.Text = "ddd" & dest
    Cacchio perchè non vai!!!!

  5. #5
    ok sono ufficialmente un cretino......
    non avevo messo il postback nell'onload della pagina...

    Scusate se vi ho fatto perdere tempo...

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.