Bueno podrias hacerlo leyedo un ini.. te dejo como leer y como escribir ini..
Para Leer Ini:Dim cadena As String
Dim separa As Variant
Open App.Path & "\Configuracion.ini" For Input As #1
While Not EOF(1)
Line Input #1, cadena
separa = Split(cadena, ":")
If separa(0) = "LocalPort" Then Text1.Text = separa(1)
'Esto solo lee el archivo y lo pone en el programa
Wend
Close #1
Para Escribir Ini:
Open App.Path & "\Configuracion.ini" For Output As #1
Print #1, "LocalPort:" & Text1.Text
'y aki lo escribe al cerrar
Close #1
Si tienes alguna duda, ya sabes.

Salu2
Ranslsad