Imports System
Public Module Module1
Public Sub Main()
Dim rand As Random = new Random()
For cout As Integer = 1 To 20
Dim s As String = string.Empty
For i As Integer = 1 To 10
s = String.Concat(s, rand.Next(10).ToString())
Next
Console.WriteLine(s)
Next
End Sub
End Module
' run:
'
' 8912611363
' 9644242920
' 0087350430
' 7865978759
' 5515738575
' 8976071490
' 0696510945
' 5543448200
' 7568280042
' 5485886595
' 2801934416
' 8948259037
' 0042016946
' 7324785499
' 3688369923
' 8512423718
' 6595856014
' 9514341694
' 1770721094
' 4731386397