hi,

Follwing is my code,

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'TODO: This line of code loads data into the 'DataSet1.COUNTRIES' table. You can move, or remove it, as needed.

Me.COUNTRIESTableAdapter.Fill(Me.DataSet1.COUNTRIES)

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Me.BindingContext(DataSet1, "COUNTRIES").Position = 0

Label1.Text = "You are currently at record " & (Me.BindingContext(DataSet1, "COUNTRIES").Position + 1).ToString & "of" & Me.BindingContext(DataSet1, "COUNTRIES").Count.ToString

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Me.BindingContext(DataSet1, "COUNTRIES").Position = (Me.BindingContext(DataSet1, "COUNTRIES").Position - 1)

Label1.Text = "You are currently at record " & (Me.BindingContext(DataSet1, "COUNTRIES").Position + 1).ToString & "of" & Me.BindingContext(DataSet1, "COUNTRIES").Count.ToString

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Me.BindingContext(DataSet1, "COUNTRIES").Position = (Me.BindingContext(DataSet1, "COUNTRIES").Position + 1)

Label1.Text = "You are currently at record " & (Me.BindingContext(DataSet1, "COUNTRIES").Position + 1).ToString & "of" & Me.BindingContext(DataSet1, "COUNTRIES").Count.ToString

End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

Me.BindingContext(DataSet1, "COUNTRIES").Position = (Me.BindingContext(DataSet1, "COUNTRIES").Count - 1)

Label1.Text = "You are currently at record " & (Me.BindingContext(DataSet1, "COUNTRIES").Position + 1).ToString & "of" & Me.BindingContext(DataSet1, "COUNTRIES").Count.ToString

End Sub

End Class

when i run the program, only the first record of the table is shown in the textbox. Although the records are moving (indicated in label box), the value in the text box(which i used to output content of current record) is not changing

i'm am a beginner to vb. Please tell me what to do with some sample code...