I am trying to work the next and previous button to read or navigate throughrecords, please help me to correct this, I'm stuck here:
Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
Dim k As Integer
Dim i As Integer
k = 1
i = k + 1
Try
FileGet(1, MyEmployees, k)
With MyEmployees
TextBox1.Text = .ZipCode
TextBox2.Text = .PONumber
TextBox3.Text = .FirstName
TextBox4.Text = .LastName
TextBox5.Text = .SSN
TextBox6.Text = .DOB
End With
Catch ex As Exception
MsgBox("Error in reading")
End Try
End Sub