Home › 3_2004-2005 › Save / Write contents of a listbox to a textfile
Advertisement
3_2004-2005 Files/ File Controls/ Input/ Output #137363

Save / Write contents of a listbox to a textfile

Marcel Wijnands
★★★★★
4.8 · Downloads: 2,341

Save /Write contents of a listbox to a textfile

AI

AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Source Code
original-source 
Public Sub ListBox2File(sFile As String, oList As ListBox)
Dim fnum, x As Integer
Dim sTemp As String 
 fnum = FreeFile()
 x = 0
 Open sFile For Output As fnum
  While x <> oList.ListCount
   Print #fnum, oList.List(x)
   x = x + 1
  Wend
 Close fnum
End Sub
'Check out http://www.vb2delphi.com for more code!
Original Comments (3)
Recovered from Wayback Machine