My First Post!!!
how do i make random letters like 5-13 letters appera on a textbox?
Printable View
My First Post!!!
how do i make random letters like 5-13 letters appera on a textbox?
Try the following
Code:Private Sub Command1_Click()
Randomize
Do Until Char > 32
Char = Int(Rnd * 126) + 1
Loop
Text1 = Text1 & Chr(Char)
End Sub
thanx ill try that
how do i make it so its only letters
Change it to this.
Code:Private Sub Command1_Click()
Randomize
Do Until Char > 64
Char = Int(Rnd * 122) + 1
Loop
Text1 = Text1 & Chr(Char)
End Sub