VB DataGridView分页，本人只做了上一页和下一页

 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click ‘下一页
        Dim page As New Paging
        Dim MySqlServer As New clsSqlServer("Server=PC-201108181735;Initial Catalog=CAMC_DCS;User ID=sa; Password=niu6351") ‘这个是连接数据库需要的参数语句
        Dim sql As String = "select max(frmSortID) from frmSort ‘查询出最大行数，用来计算页数
        Dim dss As DataSet = MySqlServer.GetDataSet(sql)
        Dim numRows As Integer = dss.Tables(0).Rows(0).Item(0).ToString
        flag += 1
        If flag > numRows / 2 Then
            flag -= 1
        End If
        page.getaddPaging(flag, ds, DataGridView1)

    End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 下一页
        Dim page As New Paging
        flag -&#