Dim ItemArray(Me.ListBox1.Items.Count - 1) As Object Me.ListBox1.Items.CopyTo(ItemArray, 0) Dim Data As String = Join(ItemArray, Environment.NewLine) My.Computer.FileSystem.WriteAllText("C:\Users\Juljan\Desktop\text.txt", Data, False)
string.Empty
FileSaveDialog
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)