First implment this code in your form:
Private Function RandomNumberAsString(ByVal Min As Int32, ByVal Max As Int32) As String
Return (New Random).Next(Min, Max).ToString
End Function
Then when a user clicks Button1 or whatever put this code for it.
TextBox1.Text =...