Ob als Struktur oder in einer Sammlung implementiert , stellt die Schlüssel-Wert- Paar ein leistungsfähiges Werkzeug für Visual Basic.Net Entwickler. Eine einzigartige Sammlung der wichtigsten Werte , in der Regel ein einfacher String oder Integer , Punkte zu einem komplexeren Datentyp oder Struktur erlaubt den schnellen Zugriff auf die Daten . Zum Beispiel, wenn ein Web- Benutzer eine Benutzer-ID enthält , kann diese Taste Abrufen des Passworts und Berechtigungen mit dem Benutzer zugeordnet ist. Nach ein paar Schritten können Sie speichern und dann abrufen eine Reihe von einfachen Schlüssel-Wert -Paare in eine Textdatei. Was Sie brauchen
Microsoft Visual Studio oder Visual Basic Express ( 2005 oder später ) auf Twitter anzeigen Weitere Anweisungen
1
Öffnen Sie Visual Studio oder Visual Basic Express, klicken Sie dann auf " file "und" New Project ". Wenn das neue Projekt -Fenster erscheint , klicken Sie auf " Visual Basic , Windows " auf der Baumansicht wählen Sie das Symbol Konsolenanwendung , dann klicken Sie auf die Schaltfläche "OK" . Nach einer kurzen Wartezeit , wird der Text -Editor-Fenster erscheinen
2
Fügen Sie die folgenden Einfuhren in die Anfang des Programms : .
Imports System.Collections.Generic
< p > Imports System.IO
Module Module1
Sub Main ()
Diese Importe bieten Definitionen für die SortedList-Klasse sowie die Objekte und Methoden zum Lesen und schreiben von Textdateien . Die restlichen Code wurde von Visual Studio erstellt
3
erstellen sortierten Liste und laden Sie es mit einigen Daten : .
Dim As New Staaten SortedList (Of String, String)
states.Add ( "CA" , "California" )
states.Add ( " NV ", " Nevada " )
states.Add ( "UT " , " Utah " )
states.Add ( "AZ", "Arizona" )
states.Add ("CO ", " Colorado " )
states.Add ( " NM ", " New Mexico " )
Console.WriteLine (" States Liste hinzugefügt :" & states.Count.ToString )
SortedList Staaten enthält jetzt ein paar Status-Code und Abkürzungen . ihrer assoziierten Staat Namen
4
schreiben Sie die sortierte Liste in eine Textdatei :
Dim Dateiname As String = " StateList.txt "
Dim WRTR Wie StreamWriter = Nothing
Dim i As Integer
Versuchen
WRTR = File.CreateText (Dateiname)
For i = 0 To states.Count - 1
wrtr.WriteLine ( states.Keys ( i) & "," & states.Values (i))
Weiter
Fang ex As Exception
Console.WriteLine (" Kann nicht schreiben Landesliste " & ex.Message )
Return
Schließlich
wrtr.Close ()
End Try
Hier verwenden Sie einen StreamWriter , um den Status -Code und den Namen durch ein Komma in einer Textdatei namens stateList.txt getrennt schreiben
5
Lesen Sie den Text -Datei wieder in eine zweite sortedList : .
Dim As New newStates SortedList (Of String, String)
Dim rdr Wie StreamReader = Nothing
Dim txt As String Dim
s As String ( )
Versuchen
rdr = File.OpenText (Dateiname)
Während rdr.EndOfStream = False
txt = rdr.ReadLine
s = txt.Split ( ",")
newStates.Add (s ( 0) , s ( 1) )
End While
Fang ex As Exception
MsgBox (" Kann nicht lesen Landesliste " & ex.Message )
Return
Schließlich
rdr.Close ()
End Try
Dieser Codeblock liest die Datei eine Zeile in einer Zeit, in eine String-Variable , dann nutzt die Zeichenfolge Split-Methode , es zu brechen zurück in die Schlüssel-Wert- Paaren. Sobald die Paare aufgeteilt bekommen , werden sie zu einer neuen sortierten Liste genannt newStates hinzugefügt
6
Zeigen Sie den Inhalt des neuen sortierten Liste auf der Konsole : .
For i = 0 To newStates.Count - 1 of
Console.WriteLine ( newStates.Keys ( i) & "-" & newStates.Values (i))
Weiter
End Sub
End Module
Hier einfach eine Schleife durch die sortierte Liste angezeigt und jedes Paar auf der Konsole . Da es sich um eine sortierte Liste , werden die Zustände automatisch alphabetisch nach Schlüssel-Wert sortiert.
7
Klicken Sie auf " F5 ", um das Programm auszuführen.
