Imports System

Public Module Module1

    Public Sub Main()

        Dim rn as new random

        Dim x as integer

        for i = 1 to 20

        X = rn.next(1, 11)

    console.WriteLine(x)

next

​

    End Sub

End Module