Reply to thread

Message

<blockquote data-quote="tibby812" data-source="post: 7948" data-attributes="member: 2906">Good Evening,I have just signed up in hopes of finding a good explanation to my question. I would like to thank everyone in advance for any help they could give.Problem:I am trying to create a &quot;Previous Record&quot; button for a windows form.Current Setup:i have a File menu with 2 menu items ( OPEN , EXIT )i have 2 labels for display purposes ( nameLabel , phoneLabel )and i have 2 buttons ( NEXT , PREV )i am using the StreamReader to open up and read from a txt file.Here is the code that i have on the form.[CODE]Option Strict OnImports System.IOPublic Class Form1&nbsp; &nbsp; Inherits System.Windows.Forms.FormPrivate phoneStreamReader As StreamReader&nbsp; &nbsp; Private Sub fileOpenMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles fileOpenMenuItem.Click&nbsp; &nbsp; &nbsp; &nbsp; 'Open the file&nbsp; &nbsp; &nbsp; &nbsp; Dim response As DialogResult&nbsp; &nbsp; &nbsp; &nbsp; OpenFileDialog1.InitialDirectory = Application.StartupPath&nbsp; &nbsp; &nbsp; &nbsp; response = OpenFileDialog1.ShowDialog()&nbsp; &nbsp; &nbsp; &nbsp; If response &lt;&gt; DialogResult.Cancel Then&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; phoneStreamReader = New StreamReader(OpenFileDialog1.FileName)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; nextButton_Click(sender, e)&nbsp; &nbsp; &nbsp; &nbsp; End If&nbsp; &nbsp; End Sub&nbsp; &nbsp; Private Sub nextButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles nextButton.Click&nbsp; &nbsp; &nbsp; &nbsp; Dim test As Long&nbsp; &nbsp; &nbsp; &nbsp; If phoneStreamReader.Peek &lt;&gt; -1 Then&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; nameLabel.Text = phoneStreamReader.ReadLine()&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; phoneLabel.Text = phoneStreamReader.ReadLine()&nbsp; &nbsp; &nbsp; &nbsp; End If&nbsp; &nbsp; End Sub&nbsp; &nbsp; Private Sub prevButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles prevButton.Click&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; End SubEnd Class[/CODE] As the code shows, i am asking the user to specify the TXT file, then the file is open and read. The first 2 lines are then assigned to the Labels.TextMy problem is i would like to setup a previous button to go &quot;backwards&quot; in the txt file.Is this possible?Thank YouTibby</blockquote>

[QUOTE="tibby812, post: 7948, member: 2906"] Good Evening, I have just signed up in hopes of finding a good explanation to my question. I would like to thank everyone in advance for any help they could give. Problem: I am trying to create a "Previous Record" button for a windows form. Current Setup: i have a File menu with 2 menu items ( OPEN , EXIT ) i have 2 labels for display purposes ( nameLabel , phoneLabel ) and i have 2 buttons ( NEXT , PREV ) i am using the StreamReader to open up and read from a txt file. Here is the code that i have on the form. [CODE] Option Strict On Imports System.IO Public Class Form1 Inherits System.Windows.Forms.Form Private phoneStreamReader As StreamReader Private Sub fileOpenMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles fileOpenMenuItem.Click 'Open the file Dim response As DialogResult OpenFileDialog1.InitialDirectory = Application.StartupPath response = OpenFileDialog1.ShowDialog() If response <> DialogResult.Cancel Then phoneStreamReader = New StreamReader(OpenFileDialog1.FileName) nextButton_Click(sender, e) End If End Sub Private Sub nextButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles nextButton.Click Dim test As Long If phoneStreamReader.Peek <> -1 Then nameLabel.Text = phoneStreamReader.ReadLine() phoneLabel.Text = phoneStreamReader.ReadLine() End If End Sub Private Sub prevButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles prevButton.Click End Sub End Class [/CODE] As the code shows, i am asking the user to specify the TXT file, then the file is open and read. The first 2 lines are then assigned to the Labels.Text My problem is i would like to setup a previous button to go "backwards" in the txt file. Is this possible? Thank You Tibby [/QUOTE]

Verification