It should be obvious that it replaces the "UserName = " part because this is exactly what you are asking it to do.
Why not replacing the "Unnamed" part instead? Something like:
IO.File.WriteAllText(FilePath, IO.File.ReadAllText(FilePath).Replace("Unnamed", TextBox_NewUser.Text)