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

    Dim objElemento as ListItem

    ciao a tutti ...

    sto cercando (non senza difficoltà) di fare due listbox dove nel primo ci sono tutti gli utenti fdi un certo gruppo tali utenti possono essere selezionati e portati nella seconda listbox

    questo è il codice che mi carica la prima listbox :

    (lo ometto in quanto funziona)

    questo è invece il codice che mi carica la seconda listbox che mi da problemi (in pratica non riesco a riprendere i valori di listagen)
    e il debug mi da un errore su objElemento (BC30002: Tipo 'objElemento.text' non definito.)


    Dim objElemento as ListItem
    Dim strMessaggio as String


    For Each objElemento in ListAgen.Items
    If objElemento.Selected Then
    ListAgenok.Items.Add(New objElemento.text))
    End If
    Next


    Grazie 1000

    Paolo

  2. #2

  3. #3
    si infatti mi sono sbagliato..

    sorry

  4. #4
    objElemento è già istanziato (dal ciclo for each), e non c'è bisogno di istanziarlo di nuovo (puoi passarlo direttamente alla Add):
    codice:
    Dim objElemento as ListItem 
    Dim strMessaggio as String 
    
    
    For Each objElemento in ListAgen.Items 
    If objElemento.Selected Then 
    ListAgenok.Items.Add(objElemento)
    End If 
    Next
    poi c'era una parantesi in più, ma forse e solo un errore di trascrizione

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 © 2026 vBulletin Solutions, Inc. All rights reserved.