Scusa per il vb6

Comunque volevo ringraziarvi, sono riuscito a fare quello che volevo...
Ora vorrei passare al livello successivo...generare un codice alfanumerico...ho trovato dei codici in altri siti ma spiegati male..

Correggetemi se sbaglio...
Devo in sostanza generare una stringa con tutti i numeri e le lettere , un intero che vada a prendere un valore in random di quella stringa e infine una seconda stringa che restituisca un tot di interi in random (ad esempio 10)...giusto?!
Faccio un esempio
Dim stringalphanum As String
Dim x As Integer
Dim codice As String

stringalphanum = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklm nopqrstuvwxyz"
Una volta capito questo concetto però non riesco a scrivere il codice che dica di prendere tot valori di stringalphanum in random e di scriverli in sequenza in una stringa "codice"...
Spero di essere stato chiaro...
Grazie
HELP!