Question

How to generate random integer in VB.NET

Answer 1

Imports System
				
Public Module Module1
	Public Sub Main()
		Dim r As Random = New Random	
		
		For i As Integer = 0 to 30
   			Console.WriteLine(r.Next(7, 19)) ' 7 - 18
		Next 
	End Sub
End Module





' run:
'
' 11
' 18
' 16
' 9
' 9
' 14
' 17
' 11
' 16
' 17
' 14
' 14
' 7
' 8
' 12
' 9
' 18
' 15
' 7
' 7
' 8
' 12
' 14
' 10
' 7
' 11
' 17
' 10
' 11
' 7
' 9
' 

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System

Public Class Program
	Public Shared Sub Main()
        Dim rand As Random = New Random()

        For i As Integer = 1 To 20
			Console.WriteLine(rand.[Next](28)) ' 0 - 27
        Next

    End Sub
End Class




' run:
'
' 1
' 0
' 22
' 15
' 27
' 4
' 5
' 2
' 16
' 19
' 9
' 25
' 9
' 16
' 2
' 3
' 2
' 3
' 1
' 0
' 

 

70+ SQL courses for beginners and professionals