Visual Basic 6 - Randomize

Salve, generalmente per randomizzare dei numeri o lettere utilizzo il seguente codice:

lblL1.Caption = Mid$("BCDFGHJKLMNPQRSTVWXZ", Int(Rnd * 20) + 1, 2)

Questo semplice codice quindi, randomizza tutte le lettere dell'alfabeto.
Ora mi chiedo: se io volessi randomizzare intere parole come per esempio "casa","albero","gelato", che codice devo utilizzare?

Ringrazio anticipatamente tutti coloro che mi daranno una risposta

in che senso?

con questo codice:
lblL1.Caption = Mid$("BCDFGHJKLMNPQRSTVWXZ", Int(Rnd * 20) + 1, 2)
mette in ordine casuale quelle lettere (BCDFGHJKLMNPQRSTVWXZ).
Vorrei sapere cosa dovrei fare per randomizzare intere parole, visto che nel codice precedente randomizza le singole lettere

be fai un ciclo lungo quanto la parola poi scegli a caso la lettera e la togli dalla lista e ripeti fino alla fine

Forse così:

Dim parole

Private Sub Form_Load()
parole = Array("ciao", "lol", "miao", "bau"
Randomize
MsgBox parole(Rnd(3))

End Sub

intendevi questo più o meno?

penso che intendesse più un anagramma.
dim lunghezza as integer
dim stringainiziale as string
dim stringafinale as string
dim caratteretolto as integer
stringafinale = ""
stringainiziale = text1.text
for x = 1 to len(text1.text)
caratteretolto =rnd()*len(stringainiziale)+1
stringafinale = stringafinale & MID(stringainiziale,caratteretolto,1)
stringainiziale = MID(stringainiziale,1,caratteretolto-1) & MID(stringainiziale,caratteretolto+1)
next x
text1.text = stringafinale

Sisi, ti ringrazio, anche se la cosa strana è che randomizza solo le parole "ciao" e "lol"

prova a cambiare "rnd(3)" con "int(rnd()*4)+1"

asp potrebbe essere anche "int(rnd()*4)" dipende se l'array parte da 0 o da 1