Visual Basic.NET - Problema con addnew

Tengo un form con una serie de campos vinculados a un Dataset (base de datos access). El caso es que en el evento Load del Form creo un registro nuevo y despues asigno un valor a una caja de texto, con el siguiente codigo:

Private Sub AñadirAlumnosForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Me.AlumnosTableAdapter.Fill(Me.AlumnosDS.Alumnos)
Me.AlumnosBindingSource.AddNew()
FechaAltaTextBox.Text = "prueba"

End Sub

Pues bien, el problema es que la caja de texto se queda en blanco. Alguien me puede ayudar con esto?

debes hacerlo de la sgte. manera :

la primera linea donde cargas con fill tu adapter esta bien , luego de esa linea coloca asi :

dim obind as binding
obind = new binding("text",me.alumnosds,"nombretabla.campo")
fechaaltatextbox.databindings.add(obind)
obind = nothing

Espero te sirva amigo.

saludos