Dim N1 As String = (Int(Rnd() * 36)).ToString
If N1= "10" Then
TextBox1.Text = N1
Just do the same for 11,12,13 etc...
Hope this helps
Microsoft is conducting an online survey to understand your opinion of the Msdn Web site. If you choose to participate, the online survey will be presented to you when you leave the Msdn Web site.
Would you like to participate?