How to create unique string using GUID in VB.NET

1 Answer

0 votes
Imports System

Public Class Program
    Public Shared Function CreateUniqueString() As String
        Dim g As Guid = Guid.NewGuid()
		
        Dim uniqueString As String = Convert.ToBase64String(g.ToByteArray())
        uniqueString = uniqueString.Replace("+", "")
        uniqueString = uniqueString.Replace("=", "")
        uniqueString = uniqueString.Replace("/", "")
		
        Return uniqueString
    End Function

    Public Shared Sub Main()
        Dim uniqueString As String = CreateUniqueString()
		
        Console.Write(uniqueString)
    End Sub
End Class



' run:
'
' J0BTF1oQ0q1lMOw82pENA
'

 



answered Jan 27, 2024 by avibootz
...