Question

How to generate 10 random 5 characters strings in VB.NET

Answer 1

Imports System
Imports System.Text

Public Class Program
	Public Shared Dim rnd As Random = New Random()
	
    Public Shared Function generateRandomString(ByVal len As Integer) As String
        Dim charset As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
        
        Dim sb As StringBuilder = New StringBuilder(len)

        For i As Integer = 0 To len - 1
            sb.Append(charset(rnd.[Next](charset.Length)))
        Next

        Return sb.ToString()
    End Function

    Public Shared Sub Main()
        For i As Integer = 0 To 10 - 1
            Console.WriteLine(generateRandomString(5))
        Next
    End Sub
End Class




' run:
'
' nOmjE
' gHKQN
' dzvKB
' TMXOF
' FOWxp
' pXkWa
' BzyZk
' IuvDQ
' mkwEY
' HIcwX
'

 

70+ SQL courses for beginners and professionals