Visual Basic 6 - Estrarre a caso un file da una FileListBox

Ciao a tutti, ho un form con dentro una label, una FileListBox e un CommandButton, vorrei che premendo il CommandButton nella label comparisse il percorso di uno dei file della FileListBox scelto a caso e che ripremendo il CommandButton ne uscisse un'altro diverso.
Non saprei proprio come farlo!!

Estrai in maniera casuale un numero tra 0 e File1.ListCount - 1 (trovi nel forum un mucchio di messaggi con metodi per estrarre random il numero) e attribuisci alla textbox il contenuto della riga con:

File1.list(numero random)

Grazie per la risposta, questo è il codice che ho usato:

Private Sub Command3_Click()
Dim val As Integer
va = CInt(Int((File1.ListCount - 1 * Rnd()) + 1))
label1.caption = va
End Sub

ma mi esce sempre 4 ovvero l'ultimo elemento della FileListBox

prova
va = CInt(Int(((File1.ListCount - 1) * Rnd()) + 1))

la formula da usare per la funzione Rnd é:

Int((limitesup - limiteinf + 1) * Rnd + limiteinf)
' nel tuo caso
limitesup = File1.ListCount - 1 
limiteinf = 0
' quindi
va =Int(File1.ListCount * Rnd)

Edit:
La formula di a_butta mi pare che non estrarrà mai il valore 0, la prima riga della lista.

Devi poi risolvere il fatto delle uscite duplicate.

Grazie a tutti, ho risolto!