Leer, Guardar, Cargar .INI

[SγиtαxEяяoя]

Tengo un formulario el cual contiene 2 "Textbox"

Nombre.Text
Apellido.Text



Lo que quiero hacer es que al abrir el programa, éste cree el archivo .INI con el nombre y apellido automáticamente.



Luego poder cambiar esos valor y al darle clic en el botón 'Guardar' y se guarden esos datos.



Al cerrar el programa y volverlo a abrir Cargue esos datos ya guardados en los mismos Textbox.



Agradezco de antemano cualquier tipo de ayuda.

[Eleкtro]

Código (vbnet) [Seleccionar] Expandir

Dim INI_File As String = ".\Test.ini"

Guardar:
Edito: Mejorado

Código (vbnet) [Seleccionar] Expandir

   ' Save INI Settings
   Private Sub Save_INI_Settings()

       Dim Current_Settings As String = _
           "File=" & TextBox_File.Text & Environment.NewLine & _
           "SaveFile=" & CheckBox_SaveFile.Checked

       My.Computer.FileSystem.WriteAllText(INI_File, Current_Settings, False)

   End Sub

Cargar:

Código (vbnet) [Seleccionar] Expandir

    ' By Elektro H@cker

   ' Load INI Settings
   Private Sub Load_INI_Settings()

       Dim xRead As IO.StreamReader = IO.File.OpenText(INI_File)
       Dim Line As String = String.Empty
       Dim Delimiter As String = "="
       Dim ValueName As String = String.Empty
       Dim Value As Object

       ' Example content of Test.ini:
       '
       ' File=C:\File.txt
       ' SaveFile=True

       Do Until xRead.EndOfStream

           Line = xRead.ReadLine().ToLower
           ValueName = Line.Split(Delimiter).First
           Value = Line.Split(Delimiter).Last

           If ValueName = "File".ToLower Then TextBox_File.Text = Value
           If ValueName = "SaveFile".ToLower Then CheckBox_SaveFile.Checked = Value

           Application.DoEvents()

       Loop

       xRead.Close() : xRead.Dispose()

   End Sub

[z3nth10n]

LOL, vaya programa te estás montando... xD

Anda que no tienes suerte Snytax, Elektro haciéndote el code... xD
Que recuerdos...!

[SγиtαxEяяoя]

LOL, vaya programa te estás montando... xD

Anda que no tienes suerte Snytax, Elektro haciéndote el code... xD
Que recuerdos...!

Es que le pregunte por mp porque tenia duda.. y entonces encontre unos tutoriales y le dije que ya no era necesaria la ayuda.. tonces me dijo que el tenia un mejor codigo y que lo publicaba para que todos los vieran fue por eso que cree el tema

[Eleкtro]

Como ha dicho SyntaxError404, es que si estas dudas se resuelven por privado a una sola persona entonces las soluciones no le sirven a nadie más.

Un saludo!

[z3nth10n]

Como ha dicho SyntaxError404, es que si estas dudas se resuelven por privado a una sola persona entonces las soluciones no le sirven a nadie más.

Un saludo!

Claro, es por eso que cuando pido soporte por MP no me lo dan XD
Ya lo entiendo... xD (hombre, lo suponía)

Pero Elektro mola, porque el te ayuda desde MP y no te obliga a que lo postee, no como otros (Dryv) 

[SγиtαxEяяoя]

Genial, tu codigo funciona a la perfeccion..

solo que cambie unas pequeñas cosas y ya

Gracias por tu ayuda.. todas estas pequeñas cosas que me explican me servira para un futuro.. aunque en uno no muy lejano el VB.NET estara obsoleto y abran mejores programas 

[Eleкtro]

aunque en uno no muy lejano el VB.NET estara obsoleto y abran mejores programas 

No lo creo, VB lleva décadas evolucionando, quizás dentro de 10 años hagan un nuevo lenguaje basado en vbnet, pero solo cambiarán unas cuantas cosas pudiéndose traducir fácilmente los códigos, a menos que el Framework ya no existiese en ese futuro, entonces el nuevo lenguaje se basaría en otros métodos y todo sería absolútamente diferente xD.

Yo diría que la evolución de VB no va a morir hasta que Microsoft deje de existir.

Saludos.