Cómo escribir una lista de pares de valores clave en VB.NET

Si implementa como una estructura o en una colección, el par de valores clave proporciona una poderosa herramienta para los desarrolladores de Visual Basic.Net . Una colección única de valores clave , por lo general una simple cadena o entero , apunta a un tipo de datos más compleja o estructura , lo que permite un acceso rápido a los datos. Por ejemplo , cuando un usuario Web proporciona un ID de usuario , esta clave puede recuperar la contraseña y permisos asociados con el usuario . Después de unos pocos pasos, puede almacenar y luego recuperar un conjunto de pares simples de valores clave en un archivo de texto. Cosas que necesitará
Microsoft Visual Studio o Visual Basic Express ( 2005 o posterior)
Ver Más instrucciones
1

Abra Visual Studio o Visual Basic Express , haga clic en " archivo " y" Nuevo proyecto " . Cuando aparezca la nueva ventana del proyecto , haga clic en "Visual Basic , Windows " en la vista de árbol , seleccione el icono de la aplicación de consola , a continuación, haga clic en el botón " OK" . Después de una corta espera , aparecerá la ventana del editor de texto
2

Agregue las siguientes importaciones a la parte superior del programa : .

Importaciones System.Collections.Generic
< p > Imports System.IO

Module Module1

Sub Main ()

Estas importaciones proporcionan definiciones para la clase SortedList , así como los objetos y métodos para leer y escribir archivos de texto . El código restante fue creado por Visual Studio
3

Crear una lista ordenada y cargar con algunos datos : .

Estados Dim As New 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 ( " Unidos añadieron a la lista :" & states.Count.ToString )

SortedList estados ahora contiene algunas abreviaturas del código estatal y . sus nombres asociados estatales
4

Escribir la lista ordenada de un archivo de texto :

fileName As String = " StateList.txt "

WRTR As StreamWriter = Nothing

Dim i As Integer

Trate

WRTR = File.CreateText ( fileName )

For i = 0 To states.Count - 1

wrtr.WriteLine ( states.Keys ( i ) & ", " & states.Values ( i ))

Catch ex As Exception

Console.WriteLine ( " no se puede escribir la lista estatal " & ex.Message )

Volver

Finalmente

wrtr.Close ()

End Try

Aquí se utiliza un StreamWriter para escribir el código del estado y el nombre separado por una coma en un archivo de texto llamado stateList.txt
5

Leer el archivo de texto nuevo en un segundo sortedList : .

newStates Dim As New SortedList ( Of String , String )

rdr As StreamReader = Nothing

Dim txt As String

Dim s As String ()

Prueba

rdr = File.OpenText ( fileName )

Mientras rdr.EndOfStream = False

txt = rdr.ReadLine

s = txt.Split (", " )

newStates.Add ( s ( 0 ) , s ( 1 ))

End While

Catch ex As Exception

MsgBox ( "No se puede leer la lista de estado " y ex.Message )

Volver

Finalmente

rdr.Close ()

End Try

Este bloque de código lee la línea del archivo de uno en uno en una variable de cadena, a continuación, utiliza el método de reparto de la cuerda para romper de nuevo en los pares de clave y valor. Una vez que las parejas quedan divididas , que se agregan a una nueva lista ordenada llamada newStates
6

mostrar el contenido de la nueva lista ordenada en la consola: .

For i = 0 To newStates.Count - 1

Console.WriteLine ( newStates.Keys ( i ) & " - " & newStates.Values ( i ) ) guía

End Sub
Final

Módulo

Aquí simplemente recorrer la lista ordenada y mostrar cada par a la consola. Como se trata de una lista ordenada , los estados se ordenan automáticamente en orden alfabético por valor clave.
7

clic en "F5 " para ejecutar el programa.