AfterLoad
Dim tb1 As WinForm.TextBox = e.Form.Controls("TextBox1")
tb1.Select
tb1.SelectionStart=tb1.text.length