Lo script di iguana è corretto tranne in alcuni punti:
codice:Combo1.Clear Dim FileNumber As Integer Dim TmpStr As String 'non c'era lo spazio tra dim e TmpStr FileNumber = FreeFile Open "c:\mirko.txt" For Input As #FileNumber 'Era stata indicata la variabile fn invece di FileNumber Do Until EOF(FileNumber) Line Input #FileNumber, TmpStr Combo1.AddItem TmpStr Loop