• Home
 · 
• VB function enhancement
 · 
• load file to listbox

load file to listbox

2 simple code that save items to a file and the other that load items to the listbox from the file visit my homepage at https://www.cyberway.com.sg/~dyrws 4 more app

Rate load file to listbox

• 1
• 2
• 3
• 4
• 5

(4(4 Vote))

*** The Save Function ***
  Open App.Path & "\" & "playlist.dyr" For Output As 1
    For x = 0 To List1.ListCount - 1
      List1.ListIndex = x
      Print #1, List1.Text
    Next
  Close 1
*** The Load Function ***
  Open App.Path & "\" & "playlist.dyr" For Input As 1
    Do Until EOF(1)
      Line Input #1, st
      List1.AddItem st
    Loop
  Close 1