Add navigator to asp:datagrid (VB.net)

<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="System.Data" %>
<script runat=server>
Private MyDT As New DataTable
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
    Dim MyRow As DataRow
    MyDT.Columns.Add(New DataColumn("EmployeeID", _
        GetType(Int32)))
    MyDT.Columns.Add(New DataColumn("EmployeeFirstName", _
        GetType(String)))
    MyDT.Columns.Add(New DataColumn("EmployeeLastName", _
        GetType(String)))
    MyDT.Columns.Add(New DataColumn("BirthDate", _
        GetType(Date)))
    MyDT.Columns.Add(New DataColumn("Salary", _
        GetType(Single)))

    MyRow = MyDT.NewRow()
    MyRow(0) = 1
    MyRow(1) = "Bob"
    MyRow(2) = "Miller"
    MyRow(3) = "5/15/65"
    MyRow(4) = "40000"
    MyDT.Rows.Add(MyRow)
    MyRow = MyDT.NewRow()
    MyRow(0) = 2
    MyRow(1) = "Jenny"
    MyRow(2) = "Fry"
    MyRow(3) = "7/22/75"
    MyRow(4) = "73050"
    MyDT.Rows.Add(MyRow)
    MyRow = MyDT.NewRow()
    MyRow(0) = 3
    MyRow(1) = "Lisa"
    MyRow(2) = "Smith"
    MyRow(3) = "12/8/71"
    MyRow(4) = "62500"
    MyDT.Rows.Add(MyRow)
    MyRow = MyDT.NewRow()
    MyRow(0) = 4
    MyRow(1) = "Stephanie"
    MyRow(2) = "Myer"
    MyRow(3) = "3/15/54"
    MyRow(4) = "43222"
    MyDT.Rows.Add(MyRow)
    MyRow = MyDT.NewRow()
    MyRow(0) = 5
    MyRow(1) = "Jimmy"
    MyRow(2) = "Parker"
    MyRow(3) = "3/12/47"
    MyRow(4) = "52825"
    MyDT.Rows.Add(MyRow)

    dg1.DataSource = MyDT
    dg1.DataBind()
End Sub
Sub Page_Change(sender As Object, e As DataGridPageChangedEventArgs)
    dg1.CurrentPageIndex = e.NewPageIndex
    dg1.DataSource = MyDT
    dg1.DataBind()
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>DataGrid 5 Control Sample Page</TITLE>
</HEAD>
<BODY >
<form runat="server">
<Font Face="Tahoma">
<asp:Label
    id="lblMessage"
    runat="server"
/>
<BR>
<ASP:DataGrid 
    id="dg1" 
    runat="server"
    Width="90%"
    BorderColor="black"
    CellPadding=3 
    CellSpacing="0"
    Font-Name="Trebuchet MS"
    Font-Size="10pt"
    ForeColor="Black"
    BackColor="Beige" 
    AlternatingItemStyle-ForeColor="Cornsilk"
    AlternatingItemStyle-BackColor="DarkBlue"
    AlternatingItemStyle-Font-Name="Arial"
    AlternatingItemStyle-Font-Italic="True"
    HeaderStyle-BackColor="Burlywood"
    HeaderStyle-Font-Bold="True"
    AutoGenerateColumns="False"
    PagerStyle-BackColor="White"
    PagerStyle-ForeColor="DarkGreen"
    PagerStyle-Font-Bold="True"
    AllowPaging="True"
    PageSize=2
    OnPageIndexChanged="Page_Change"
>
    <Columns>
        <asp:BoundColumn
            HeaderText="Employee ID"
            DataField="EmployeeID"
        />
        <asp:BoundColumn 
            HeaderText="Last Name" 
            DataField="EmployeeLastName"
        />
        <asp:BoundColumn 
            HeaderText="First Name" 
            DataField="EmployeeFirstName"
        />
        <asp:BoundColumn 
            HeaderText="Salary"
            DataField="Salary"
            DataFormatString="{0:C}"
        />
        <asp:BoundColumn 
            HeaderText="Birth Date"
            DataField="BirthDate"
            DataFormatString="{0:d}"
        />
    </Columns>  
</asp:DataGrid>
</Font>
</Form>
</BODY>
</HTML>

Related examples in the same category

1.	Add data to datagrid (VB.net)
2.	BorderColor, CellPadding, CellSpacing for ASP:DataGrid (VB.net)
3.	Font-Name, Font-Size for ASP:DataGrid (VB.net)
4.	ForeColor, BackColor for ASP:DataGrid (VB.net)
5.	AlternatingItemStyle-ForeColor, AlternatingItemStyle-BackColor for ASP:DataGrid (VB.net)
6.	AlternatingItemStyle-Font-Name, AlternatingItemStyle-Font-Italic (VB.net)
7.	HeaderStyle-BackColor, HeaderStyle-Font-Bold (VB.net)
8.	Add button to asp:DataGrid (VB.net)
9.	Add hyperlink a asp:datagrid (VB.net)
10.	Add hyperlink to asp:datagrid table column (VB.net)
11.	Set item style, header style and alternating item style for the asp datagrid (C#)

Add navigator to asp:datagrid (VB.net) : DataGrid « Asp Control « ASP.Net

Related examples in the same category