Question

So in my program i am trying to make it so that when you press a button it opens a “choose file” popup(where the user can choose a text file) then after the user chooses it the program will automatically load each line of the textfile into a listbox.

But i have been researching it and the only thing i have been able to find is a file>open thing. So how cold i make it open a “open” dialogue on the press of a button

and since i haven’t been able to find anything on the open dialogue i haven’t looked for anything on the loading each line of it into a listbox, so if anyone wants ot help me with that it would be great.

and i do not have any code to show you as the rest of my program has no relevance to this

Answer 1

    Using FD As New OpenFileDialog()
        FD.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
        If FD.ShowDialog = Windows.Forms.DialogResult.OK Then
            Listbox1.Items.Clear
            ListBox1.Items.AddRange(IO.File.ReadAllLines(FD.FileName))
        End If
    End Using

EDIT: Answer on the comment:

If you can use LINQ, then its a one row of code to read all lines from the listbox and write it to a file:

Save using SaveFileDialog and LINQ

    Using FD As New SaveFileDialog()
        FD.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
        If FD.ShowDialog = Windows.Forms.DialogResult.OK Then
            IO.File.WriteAllLines(fd.filename, (From p As String In ListBox1.Items Select p).ToArray)
        End If
    End Using

If you can’t use LINQ, then you can do this instead:

Save using SaveFileDialog and FOR/EACH

     Using FD As New SaveFileDialog()
        FD.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
        If FD.ShowDialog = Windows.Forms.DialogResult.OK Then
            Dim FileContent As String = ""
            For Each i As String In ListBox1.Items
                FileContent &= i & vbCrLf
            Next
            IO.File.WriteAllText(FD.FileName, FileContent)
        End If
    End Using