SendKeys.Send("{Enter}")
SendKeys.Send(TextBox1.Text)
SendKeys.Send("{Enter}")
SendKeys.Send(Rnd(1))
SendKeys.Send("{Enter}")
SendKeys.Send("{Enter}")
SendKeys.Send(TextBox1.Text + int(rnd()*10) + int(rnd()*10))