automatically generate sr no in textbox

[vkk49]

hii
i am using vs 10 & access database 7.i develop a small application that store sr no and name.so i want to generate sr no automatically in textbox .
main thing is if there are total 5 sr no saved and suppose i delete sr no 3 then so it can be rearrange
i.e.
1
2
3
4
5
if i delete 3
then it will show
1
2
4
5
but i want to display it
1
2
3
4

i.e.rearrange it


please help me

thanks

[mcupito]

How are you getting "sr no" to the text box?

[vkk49]

hii
i am using the following code to get sr no in textbox

        Dim dr As OleDbDataReader
        Dim a As Integer
        If Not cn.State = ConnectionState.Open Then
            cn.Open()
        End If
        sqlqry = "select srno from Records"
        cmd = New OleDbCommand(sqlqry, cn)
        dr = cmd.ExecuteReader
        While dr.Read
            a = dr(0)
        End While
 
        Dim i As Integer
 
        If Integer.TryParse(CStr(CDbl(a) + 1), i) Then
            TextBox1.Text = i.ToString
        End If