Dim SW As IO.StreamWriter = IO.File.CreateText("D:\yourfile.txt") For Each S As String In ListBox1.Items SW.WriteLine(S) Next SW.Close()
(16-03-20, 01:09 PM)medadam كتب : [ -> ] كود : Dim SW As IO.StreamWriter = IO.File.CreateText("D:\yourfile.txt") For Each S As String In ListBox1.Items SW.WriteLine(S) Next SW.Close()