move to next record

Hi

Its very easy and helpful code . thanks for help us through this code.

Hello Ranjana

you need to manage your code like this

declare private variables on the form class:

        Dim i As Integer = -1
        Dim recordCound As Integer = 0
        Dim ds As DataSet

on From_Load event:

 Dim con As New SqlConnection("Data Source=QADCOM7026;Initial Catalog=stu_info1;Integrated Security=True")
        con.Open()
        Dim adp As New SqlDataAdapter("select * from stu_info", con)
        Dim builder As New SqlCommandBuilder(adp)
        ds = New DataSet
        adp.Fill(ds, "stu_info")
        recordCound = ds.Tables(0).Rows.Count - 1

On Button_Click event:

If recordCound >= i Then
            i = i + 1
            TextBox1.Text = ds.Tables(0).Rows(i)("First_name").ToString()
            textBox2.Text = ds.Tables(0).Rows(i)("Last_name").ToString()
            textBox3.Text = ds.Tables(0).Rows(i)("Address").ToString()
            textBox4.Text = ds.Tables(0).Rows(i)("Phone_no").ToString()
            textBox5.Text = ds.Tables(0).Rows(i)("City").ToString()
        Else
            MessageBox.Show("This is last record")
        End If


thanks