Tab pages reading txt to list box ?

[polecat]

Hi forgive me im still new to vb.net and progging!! I have my app using tabpages thought it was easier for my project,
on tab 1 i have 2 text boxes with and output from other text boxes
I have a button to save to file this works great with snippets from you guys on here .

Now on tab2 i have a listbox the list box is populated from the saved text file works ok apart from the saved items from tab1 dont appear till the program is next run? I have hidden button3 as i have put the TabControl1.Enter there to trigger the button action as i wanted the list to load on clicking the tab not a button if you know what i mean?
The code im using is below if any body can help with away of it kind refreshing the file before populating thre list?

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click, TabControl1.Enter
 
        ' Load the ListBox from a file.
        Try
 
            Dim file_name As String = DataFile()
            Dim stream_reader As New IO.StreamReader(Application.StartupPath & "\mysaved.txt")
 
            ListBox1.Items.AddRange(Split(stream_reader.ReadToEnd, _
                vbCrLf))
            ListBox1.SelectedIndex = 0
            stream_reader.Close()
        Catch exc As Exception
            ' Report all errors.
            MsgBox(exc.Message, MsgBoxStyle.Exclamation, "Read " & _
                "Error")
        End Try
 
    End Sub
 
    ' Return the data file name.
    Private Function DataFile() As String
        Dim file_name As String = Application.StartupPath
 
        If file_name.EndsWith("\bin") Then file_name = _
            file_name.Remove(file_name.Length - 4, 4)
        file_name &= "\mysaved.txt"
        Return file_name
    End Function

[polecat]

Let me clarify a bit right tab page 1 saves to text file on tab3 it reads the file into my list box but it only shows items in the text file that were there before the prog is run not items saved while the prog is run so to view the saved items from tab1 i have to close the prog and restart it...Any help or way round it?

[gigemboy]

You might want to clear your items first before loading them again into the listbox...

.....
            .....
            Dim file_name As String = DataFile()
            Dim stream_reader As New IO.StreamReader(Application.StartupPath & "\mysaved.txt")
            ListBox1.Items.Clear() 'add this line to clear the listbox before you add items to it again
            ListBox1.Items.AddRange(Split(stream_reader.ReadToEnd, _
                vbCrLf))
           .....
           .....

Could just be that they are adding, but adding to the bottom of the listbox and you dont see them, since it retains the current items as well...

[polecat]

Thanks but that still didnt work m8 but thanks

Have added new button to the tab page labled it refresh and added your code to its onclick event and it works

Dim file_name As String = DataFile()
            Dim stream_reader As New IO.StreamReader(Application.StartupPath & "\mysaved.txt")
            ListBox1.Items.Clear() 'add this line to clear the listbox before you add items to it again
            ListBox1.Items.AddRange(Split(stream_reader.ReadToEnd, _
                vbCrLf))

So its a problem with tab click event so need to find that!