visual basic Radom Name

Bom Eu procurei e achei um topico falando a respeito só não entendi como funciona eu quero fazer o mesmo que o membro disso no topico AQUI Se alguem poder me ajuda ficarei muito grato

Public Function Gerar(Letras As Integer) As String

Dim R As New Random(My.Computer.Clock.TickCount)

Dim Permitidos As String = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"

Dim Devol As String = String.Empty

For l As Integer = 1 To Letras

Devol &= Permitidos.Substring(R.Next(0, Permitidos.Length), 1)

Next

Return Devol

End Function

esse aqui , eu coloco em cima de tudo ? e o segundo no lugar do nome da form é isso que entendi ?

Public Function Gerar(Letras As Integer) As String

Dim R As New Random(My.Computer.Clock.TickCount)

Dim Permitidos As String = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"

Dim Devol As String = String.Empty

For l As Integer = 1 To Letras

Devol &= Permitidos.Substring(R.Next(0, Permitidos.Length), 1)

Next

Return Devol

End Function

esse aqui , eu coloco em cima de tudo ? e o segundo no lugar do nome da form é isso que entendi ?

Public Function Gerar(Letras As Integer) As String

Dim R As New Random(My.Computer.Clock.TickCount)

Dim Permitidos As String = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"

Dim Devol As String = String.Empty

For l As Integer = 1 To Letras

Devol &= Permitidos.Substring(R.Next(0, Permitidos.Length), 1)

Next

Return Devol

End Function

Eu fiz o projeto usando esses codigo ae

Source aqui : http://www.mediafire.com/file/tmcowd321r46m8x/WindowsApplication2.rar