GridViewのPagerTemplateへ配置したコントロールへのアクセス

Protected Sub GoToPage_TextChanged(ByVal sender As Object, ByVal e As EventArgs) 

    Dim txtGoToPage As TextBox = DirectCast(sender, TextBox) 

    

    Dim pageNumber As Integer 

    If Integer.TryParse(txtGoToPage.Text.Trim(), pageNumber) _

        AndAlso pageNumber > 0 _

        AndAlso pageNumber <= Me.gvCustomers.PageCount Then 

        Me.gvCustomers.PageIndex = pageNumber - 1 

    Else 

        Me.gvCustomers.PageIndex = 0 

    End If 

End Sub



Protected Sub GvCustomers_RowDataBound(ByVal sender As Object, ByVal e As GridViewRowEventArgs) 

    Dim gridView As GridView = DirectCast(sender, GridView)     



    If e.Row.RowType = DataControlRowType.Pager Then 

        Dim lblTotalNumberOfPages As Label = DirectCast(e.Row.FindControl("lblTotalNumberOfPages"), Label) 

        lblTotalNumberOfPages.Text = gridView.PageCount.ToString() 

        

        Dim txtGoToPage As TextBox = DirectCast(e.Row.FindControl("txtGoToPage"), TextBox) 

        txtGoToPage.Text = (gridView.PageIndex + 1).ToString() 

        

        Dim ddlPageSize As DropDownList = DirectCast(e.Row.FindControl("ddlPageSize"), DropDownList) 

        ddlPageSize.SelectedValue = gridView.PageSize.ToString() 

    End If 

End Sub