Visual BASIC ListView è un controllo che Visualizza i dati sotto forma di elenco. Il controllo ListView può visualizzare informazioni come un elenco di icone piccole o grandi, una piccola icona con testo a destra di esso, o un formato di report in cui viene visualizzato il testo di ogni elemento "secondario" a destra sotto ogni intestazione di colonna. Questi punti di vista può sembrare familiare a voi come questo è come Windows Explorer visualizza le informazioni di file e cartelle. Le informazioni visualizzate nel controllo ListView possono essere visto, selezionate, ri-ordinate, aggiornate o esportate in un'altra applicazione, ad esempio Blocco note o Excel.

Istruzioni

1

Aprire un nuovo progetto di Visual BASIC EXE Standard. Aggiungere l'oggetto ListView alla casella degli strumenti facendo clic su "Progetto", "Componenti" e selezionare la casella di controllo accanto a "Microsoft Windows Common Controls 6.0 (SP6)." Selezionare l'oggetto ListView dalla casella degli strumenti e fare clic sul valore predefinito "Form1." Rinominare "Form1" in qualcosa di più significativo, ad esempio "frmMain" e ListView appena creato per "lvCustomer."

2

Aggiungere un pulsante "frmMain" e impostare la didascalia su "Esporta". Nell'evento "Form_Load", popolare "lvCustomer" con i dati dei clienti da codificare o recupero dei dati da un database. Aggiungere le intestazioni di colonna nello stesso modo. Un esempio di base di aggiunta di un'intestazione di colonna è "lvCustomer.ColumnHeaders.Add 1,"CustName"," nome"." Questa riga di codice indica che la prima intestazione di colonna avrà una chiave di "CustName" e un valore visualizzato all'utente del "Nome". Un esempio di base di aggiunta di una riga di dati per il "lvCustomer" è "1, lvCustomer.ListItems.Add,"John Smith"." Questa riga di codice crea una riga di dati nella prima colonna, con nessuna chiave e un valore di "John Smith".

3

Scorrendo gli elementi ListView ColumnHeader per recuperare le intestazioni di colonna.
Per i = 1 To lvCustomer.ColumnHeaders.Count

sHeader = sHeader + lvCustomer.ColumnHeaders.Item(i).Text + vbTab

Successivo
Questo codice consente di scorrere ogni ColumnHeader e memorizza il valore nella variabile stringa "sHeader" seguita da un carattere di spazio sulla scheda.

4

Creare un file di testo per memorizzare i dati di ColumnHeader con Microsoft FileSystemObject. Il codice seguente crea un file di testo denominato "output. txt" e salva il valore della variabile stringa "sHeader" di tale file:
Dim FSO come nuovo oggetto FileSystemObject
Impostare newFIle = FSO. CreateTextFile ("c:\temp\output.txt", True, False)
newFIle.Write (sHeader)

5

Aprire il contenuto del nuovo file "txt" nel blocco note con il comando "Shell":
dblNotePadID = Shell ("Notepad c:\temp\output.txt")