How to generate random letters in vb6.0
Hi
Just wondering how I would generate random letters in VB 6.0?
Cheers
Mark
Web Development
Hi
Just wondering how I would generate random letters in VB 6.0?
Cheers
Mark
by john.a.wills
by tom
Mark, try this out.....
Private Sub MakeRandom()
Dim theNum As Double
Dim theUpper As String
Dim theLower As String
' Upper Case
theUpper = Chr(64 + Rnd() * 10000000 Mod 26)
' Lower Case
theLower = Chr(96 + Rnd() * 10000000 Mod 26)
End Sub
by dvroman
Visually / Functionally The Function Would Be:
Chr$(Int(Rnd() * (Asc("Z") - Asc("A"))) + Asc("A"))
Cryptically It Would Be:
Chr$(Int(Rnd() * 25) + 65)
This discussion is closed to new replies.
Sort by Trending