hola mi problema y mi falta de conocimientos es esto estoy asiendo un editor de server y mi inconveniente es que para este tipo de caso para poder sobreescrivir en el exe lo primero que tenemos que hacer es abrirlo en binario y de alli ir colocando los datos con put siempre al final :
Private Sub Command1_Click()
Dim ip As String * 15 '//igual con la variable que contendra el pass, con capacidad de 20 bytes.
ip = Text1.Text
Open "C:\descargas\MIS PROGRAMAS\editor de server\1.exe" For Binary As #1 '//abrimos el archivo en forma binaria.
Seek (1), LOF(1) + 1 'nos vamos al final del archivo
Put #1, , ip '//colocamos el contenido de las variables
Close #1 '//cerramos el archivo.
MY PROBLEMA ES COMO AGO PARA QUE EL ARCHIVO AL QUE ESCRIBIMOS LOS DATOS AL FINAL LO PONGA EN EL TEXBOX.