示例
Private Sub Page_Load(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles MyBase.Load
    With DataGrid1
        .AllowPaging = True
        .PagerStyle.Mode = PagerMode.NumericPages
        .PageSize = 5
        .PagerStyle.PageButtonCount = 5
    End With
    If IsPostBack Then
        DataSet11 = CType(Session("dataset"), DataSet1)
    Else
        SqlDataAdapter1.Fill(DataSet11)
        Session("dataset") = DataSet11
        DataBind()
    End If
End Sub

解决方案 »

  1.   

    不好意思,还要加上一下代码,是分页时所需代码,My_grid是Datagrid的id
    Private Sub My_grid_pageIndexChanged(ByVal sender As System.Object, ByVal e As System.Web.UI.WebControls.DataGridPageChangedEventArgs) Handles My_grid.PageIndexChanged
            My_grid.CurrentPageIndex = e.NewPageIndex
            Data_bind()
    End Sub
      

  2.   

    <ASP:DataGrid id="MyDataGrid" runat="server"
            AllowPaging="True"
            PageSize="10"
            PagerStyle-Mode="NumericPages"
            PagerStyle-HorizontalAlign="Right"
            PagerStyle-NextPageText="下一页"
            PagerStyle-PrevPageText="上一页"
            OnPageIndexChanged="MyDataGrid_Page"
            BorderColor="black"
            BorderWidth="1"
            GridLines="Both"
            CellPadding="3"
            CellSpacing="0"
            Font-Name="宋体"
            Font-Size="8pt"
            HeaderStyle-BackColor="#aaaadd"
            AlternatingItemStyle-BackColor="#eeeeee"
            />