I need help on random letters

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

---