ایجاد رشته random

[هامان]

با سلام خدمت دوستان می خوام بدونم چه جوری میشه دو تا رشته تعریف کنم که حداکثر 10 کاراکتر باشن و این دوتا random باشه .با تشکر

[MH2538]

سلام
دو تا روش نمونه و ساده :
1-


Dim s As String = Guid.NewGuid().ToString()
s = s.Replace("-", "")
s = s.Remove(10, s.Length - 10)


2-


Dim s As String
Dim r As New Random(128)
s = ""
For i As Integer = 0 To 9
s = s + Chr(r.Next(48, 128))
Next