ok, grazie mille, non settavo la costante e non eseguiva nulla

Ora però mi trovo con un altro problema: devo salvare il percorso della cartella.
Per il file :

codice:
CommonDialog1.ShowOpen
If IsNull(CommonDialog1.FileName) = False Then
   Text1.Text = CommonDialog1.FileName
End If
per selezionare invece solo la cartella come posso fare???

(non devo memorizzare la cartella del file nell'esempio, in questo caso devo memorizzarmi una cartella a se stante)