nn sono sikuro di aver capito , prova questo esempio, ciao
codice:Private Sub Combo1_Click() Dim cartella As String cartella = Combo1.Text File1.Path = "C:\" & cartella End Sub Private Sub Form_Load() Combo1.Clear Combo1.AddItem "windows" Combo1.AddItem "programmi" End Sub![]()