Wie ListView Header in einem Notepad Put Mit VB6

Mitglieder-Login

InformationenVisual Basics Programmierung

Wie wird die Anzahl der Zeilen in e… Es gibt keine Methode im Visual Basic String-Klasse , um die Anzahl der Zeilen in einem mehrzeiligen
Wie man ein VBA Incremental Record … Wissen, wie man durch die Datensätze aus einer Datenbank -Tabelle mit einer Abfrage in Microsoft Off
Visual Basic-Projekte für Studiere… Microsoft Visual Basic ermöglicht es den Studierenden Aspekte sowohl lineare als auch objektorientie
Wie Visual Basic verwenden, um Schr… BASIC - Einsteiger- All-purpose Symbolic Instruction -Code - wurde im Jahre 1964 von zwei Professore

Programming

HOME

* Computer Wissen >> Programming >> Visual Basics Programmierung >> .

Wie ListView Header in einem Notepad Put Mit VB6

Der Visual Basic ListView ist ein Steuerelement, das Daten in Form einer Liste angezeigt werden. Das ListView können Informationen als eine Liste von kleinen oder großen Symbolen, ein kleines Symbol mit dem Text auf der rechten Seite , oder einen Bericht , in welchem Format der Text jeder " Unterpunkt" auf der rechten Seite unter jeder Spaltenüberschrift angezeigt anzuzeigen. Diese Ansichten können vertraut klingen Sie wie das ist, wie der Windows- Explorer-Ordner und Datei-Informationen anzeigt. Die Informationen in der ListView angezeigt angesehen werden kann , ausgewählt , neu geordnet , aktualisiert oder exportiert in eine andere Anwendung wie Notepad oder Excel. Anleitung
1

Öffnen Sie ein neues Visual Basic Standard EXE-Projekt. Fügen Sie die ListView Objekt der Toolbox , indem Sie auf "Projekt ", " Komponenten" und klicken Sie das Kontrollkästchen neben " Microsoft Windows Common Controls 6.0 (SP6) . " Wählen Sie das ListView -Objekt aus der Toolbox, und klicken Sie auf den default " Form1. " Umbenennen " Form1 ", um etwas Sinnvolles wie " frmMain " und der neu geschaffenen ListView auf " lvCustomer . "
2

Fügen Sie eine Schaltfläche zu " frmMain "und setzen Sie die Beschriftung auf" Exportieren . "In der" Form_Load " Ereignis , bevölkern " lvCustomer " mit Kundendaten entweder durch Hard- Codierung oder Abrufen der Daten aus einer Datenbank. In den Spaltenüberschriften die gleiche Weise. Ein einfaches Beispiel für das Hinzufügen einer Spalte Header " lvCustomer.ColumnHeaders.Add 1 " CustName " ," Name " . " Diese Codezeile zeigt an, dass die erste Spalte Kopfzeile wird eine Taste " CustName " haben und ein Wert angezeigt, um den Benutzer von " Name". ein einfaches Beispiel , dass eine Zeile von Daten an die " lvCustomer " ist " lvCustomer.ListItems.Add 1 , " John Smith " . " Diese Linie der Code erstellt eine Reihe von Daten, die in der ersten Spalte , ohne Schlüssel und einem Wert von " John Smith".
3

Rufen Sie die Spaltenüberschriften nach Durchlaufen der ListView ColumnHeader Artikel . For i = 1 To lvCustomer.ColumnHeaders.CountsHeader = sHeader + lvCustomer.ColumnHeaders.Item (i). Text + vbTabNextThis Code durchläuft jeder ColumnHeader und speichert den Wert in der String-Variablen " sHeader " durch einen Tabulator Leerzeichen gefolgt .
4

erstellen Sie eine Textdatei , die ColumnHeader Daten mit dem Microsoft FileSystemObject speichern. Der folgende Code erstellt eine Textdatei namens " output.txt " und speichert den Wert der String-Variable " sHeader " zu dieser Datei : Dim FSO As New FileSystemObjectSet newFile = FSO.CreateTextFile ("c: \\ temp \\ output . txt " , Öffnen True, False ) newFIle.Write ( sHeader )
5

den Inhalt des neuen " output.txt "-Datei in Notepad mit der " Shell " -Befehl: dblNotePadID = Shell ( "Notepad c : \\ temp \\ output.txt " )