• Home
 · 
• Miscellaneous
 · 
• Copy all Data from List1 to List2 (works for copying File1.Path to List1)

Copy all Data from List1 to List2 (works for copying File1.Path to List1)

Copy all Data from List1 to List2 (works for copying File1.Path to List1)

Rate Copy all Data from List1 to List2 (works for copying File1.Path to List1)

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'///Make All Data in List1 to List2'///
 Dim iCounter as Integer
For iCounter = 0 to List1.ListCount
 List2.Additem (List1.List(iCounter))
Next iCounter
'----------------------------------
'///For Putting everything in File1.Path into List1///'
 Dim iCounter as Integer
For iCounter = 0 to File1.ListCount
 List1.Additem(File1.List(iCounter))
Next iCounter