Ecco il codice in Private Sub Form_Load():
codice:
Open App.Path & "\cronologia.ini" For Input As #1
Input #1, Combo1.List
Close #1
Ed ecco quello in Private Sub Form_Unload (Cancel As Integer):
codice:
On Error GoTo fine
Open App.Path & "\cronologia.ini" For Output As #1
Print #1, Combo1.List
Close #1
Exit Sub
fine:
Close #1
MsgBox Err.Description
Però mi da errore nella stringa Input #1, Combo1.List
e nella stringa Print #1, Combo1.List
Mi sapete dire il perchè? Ho provato anche con Combo1.Text ma da errore, dice qualcosa con Variabile.
EDIT: Ecco l'errore preciso "Variable - can't assign to this expression"
Grazie