自动计数行并添加

Question

这段代码是我到目前为止的完美运行，现在我的问题是如何读取我在数据库中的行数，以便每当我点击此按钮时。

我的memberID的当前代码是（nRow（＆＃34; MemberID＆＃34;）= txtMemberId.Text），此代码从表单上的文本框中读取值并将其存储到MemberID。那么我该怎么编码这样它会自动计算我在数据库中的当前行并添加1（所以它的[当前行] +1）。

//所以如果我的数据库上有2个条目，那么点击这个添加按钮，MemberID应该有一个像2 + 1的代码。

     Private Sub btnSignUp_Click(sender As Object, e As EventArgs) Handles btnSignUp.Click
        Dim dt As DataTable = ds.Tables("member")
        Dim nRow As DataRow

        Try


            ' add a row
            nRow = dt.NewRow()
            nRow("MemberID") = txtMemberId.Text
            nRow("FName") = txtLName.Text
            nRow("LName") = txtFName.Text
            nRow("MidInit") = txtMI.Text
            nRow("username") = txtUsername.Text
            nRow("password") = txtPassword.Text
            nRow("Gender") = cmbGender.Text

            dt.Rows.Add(nRow)
            'save in the room table
            da.Update(ds, "member")

            MsgBox("The record was successfully saved.", MsgBoxStyle.Information, "employee INFORMATION")

            'Blank out the text boxes for new input/s
            txtFName.Clear()
            txtLName.Clear()
            txtMI.Clear()
            cmbGender.Text = ""
            txtUsername.Clear()
            txtPassword.Clear()

            'set the cursor on the first textbox
            txtUsername.Focus()
        Catch ex As MySqlException
            MsgBox(ex.ToString)
        End Try
    End Sub
End Class