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

    Campo nascosto in una Listview

    Vorrei utilizzare una colonna di una ListView per portarmi dietro dei dati, ma vorrei che fosse invisibile

    Impostando la larghezza della colonna a 0 non si vede nulla, ma basta trascinarle che diventa visibile...

    Come posso fare?
    visitate www.pcprimipassi.it, il portale italiano per i neofiti del computer

    "Tanto prima o poi ti buco...." disse il baco alla noce!

  2. #2
    VB6 o VB.NET? Prova a vedere se ti basta la proprietà Tag di ogni item. Ciao
    Chi non cerca trova.

  3. #3
    VB6....il tag si, può bastare ma vuole solo valori stringa, per cui volevo sapere come fare per rendere invisibile una colonna...anche perchè se devo rendere invisibili più dati diversi diventa un problema mettere tutto sulla proprietà TAG
    visitate www.pcprimipassi.it, il portale italiano per i neofiti del computer

    "Tanto prima o poi ti buco...." disse il baco alla noce!

  4. #4
    In Tag puoi mettere una stringa, di conseguenza anche un numero trasformato in stringa:
    codice:
    ListView1.ListItems(2).Tag = CStr(numero)
    Eventualmente se hai più dati li potresti memorizzare così:
    codice:
    ListView1.ListItems(2).Tag = nome & "|" & cognome & "|" & eta
    ed estrarli con la funzione Split.
    Altrimenti potresti memorizzare i dati aggiuntivi in una collection di oggetti personalizzati:
    codice:
    'in un modulo di classe: Class1
    Public nome As String
    Public peso As Integer
    Public natoil As Date
    
    'nel form:
    
    Private c As New Collection
    
    Private Sub CaricaListView()
       Dim li As ListItem
       Dim i As Integer
       Dim key As String
       Dim dato As Class1
    
       For i = 1 To 10
          key = "key_" & i
          Set li = ListView1.ListItems.Add(, key, "Elemento " & i)
          li.SubItems(1) = ...
          Set dato = New Class1
          dato.nome = ...
          dato.peso = ...
          dato.natoil = ...
          c.Add dato, key
       Next
    End Sub
    In quest'ultimo esempio ho associato ad ogni item della listview una chiave unica key, la stessa che utilizzo per memorizzare i dati aggiuntivi nella collection c. Per estrarre i dati aggiuntivi:
    codice:
    Private Sub ListView1_ItemClick(ByVal Item As ListItem)
       Dim dato As Class1
    
       Set dato = c(Item.Key)
    
       Debug.Print dato.nome, dato.peso, dato.natoil
    End Sub
    Chi non cerca trova.

  5. #5
    Grazie...sei stato gentilissimo!
    visitate www.pcprimipassi.it, il portale italiano per i neofiti del computer

    "Tanto prima o poi ti buco...." disse il baco alla noce!

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.