CiaoOriginariamente inviato da FETBIG
Ciao di nuovo
specifico meglio:
al posto di open file ci va fileopen
al posto di input # 1 ci devi mettere write(numerofile, stringa presa dalla lista tramite il ciclo)
al posto di close(numerofile) ci va fileclose
Infine l'esempio che ti ho postato ti ha sicuramente creato un file chiamato 'Testfile' nella cartella dell'applicazione. Ciao
Grazie per la tua ultima risposta che mi ha fatto notare quanto puo' essere utile il tuo codice base.Però purtroppo non sono riuscito ancora a salvare la mia lista,ho fatto come hai detto tu ma ottengo sempre alcuni errori.Il codice è questo:
E mi da ancora errore la riga Print #1, a (per la precisione solo il #1 del print) e mi continua a dare errore anche il For...codice:On Error GoTo err Dim I As Integer Dim a As String FileOpen For Output As #1 ' Ho lasciato output as #1 perchè non da errori (l'errore è il For) For I = 0 To lst.Items.Count - 1 a = lst.Items(I) Print #1, a Next FileClose() Exit Sub err: MsgBox("There has been a error!", vbOKOnly, "Error")

Rispondi quotando