Visual Basic ListView er en kontroll som viser data i liste. Den ListView kan vise informasjon som en liste over små eller store ikoner, et lite ikon med tekst til høyre for det , eller en rapport format der teksten i hver " subitem " vises til høyre under hver kolonneoverskrift . Disse synspunktene kan høres kjent ut for deg da dette er hvordan Windows Explorer viser mappen og filen informasjon. Informasjonen som vises i listevisningen kan vises, valgt, omorganisert , oppdatert eller eksporteres til et annet program som Notisblokk eller Excel. Instruksjoner
en

Åpne et nytt Visual BASIC Standard EXE -prosjekt . Legg til ListView objektet til verktøykassen ved å klikke på " Prosjekt ", " Komponenter" og klikke i boksen ved siden av " Microsoft Windows Common Controls 6,0 ( SP6 ) ." Velg ListView objektet fra verktøykassen og klikk på default " Form1 . " Gi nytt navn " Form1 " til noe mer meningsfylt som " frmMain " og den nyopprettede ListView til " lvCustomer . "
2

Legg en knapp for å " frmMain "og sette bildeteksten til" Eksport ". i" Form_Load "hendelse , befolke " lvCustomer "med kundedata enten ved hard- koding eller hente data fra en database . Legg kolonneoverskriftene på samme måte. Et grunnleggende eksempel på å legge en kolonneoverskrift er " en lvCustomer.ColumnHeaders.Add , " CustName "," Name " . " Dette kodelinje indikerer at den første kolonnen overskriften vil ha en nøkkel for « CustName " og en verdi vises til brukeren for "Name ". et grunnleggende eksempel på å legge en rad med data til " lvCustomer " er " en lvCustomer.ListItems.Add ,," John Smith " . " Denne linjen av kode oppretter en rad med data i den første kolonnen , uten nøkkel og en verdi på " John Smith. "
3

Hent kolonneoverskriftene ved looping gjennom ListView ColumnHeader elementer. for i = 1 To lvCustomer.ColumnHeaders.CountsHeader = sHeader + lvCustomer.ColumnHeaders.Item ( i) . Text + vbTabNextThis kode looper gjennom hver ColumnHeader og lagrer verdien i strengvariabelen " sHeader " etterfulgt av en fane mellomrom .

4

Opprett en tekstfil for å lagre ColumnHeader data med Microsoft FileSystemObject . Følgende kode oppretter en tekstfil kalt " output.txt " og lagrer verdien av strengen variabelen " sHeader " til denne filen : Dim FSO som ny FileSystemObjectSet newfile = FSO.CreateTextFile ( "c : \\ temp \\ output . txt " , Sann, Usann) newFIle.Write ( sHeader )
5

Åpne innholdet i den nye" output.txt "-filen i Notepad med" Shell "-kommandoen : dblNotePadID = Shell ( " Notepad c: \\ temp \\ output.txt " )