Originariamente inviato da oregon
Ti ho detto di controllare la
lunghezza
della stringa rappresentata da Item(i)
La lunghezza deve essere >0 !
If .... >0 Then
TextBox25.Text &= (ItemList.Item(i) & vbCrLf)
End If
ciao, prima di utilizzare il nothing avevo fatto una cosa simile al tuo suggerimento:
codice:
For i = 0 To ItemList.Count - 1
If ItemList.Item(i) <= 0 Then
Else
TextBox25.Text &= (ItemList.Item(i) & vbCrLf)
System.IO.File.WriteAllText(Application.StartupPath & "\libreria\lib.txt", TextBox25.Text)
End If
Next
ma mi dava un errore all'apertura dell'exe
ora ho provato a fare come mi hai consigliato ovvero cos'ì
codice:
For i = 0 To ItemList.Count - 1
If ItemList.Item(i) > 0 Then
TextBox25.Text &= (ItemList.Item(i) & vbCrLf)
System.IO.File.WriteAllText(Application.StartupPath & "\libreria\lib.txt", TextBox25.Text)
End If
Next
e l'errore persiste: