关于ＤataGrid的问题

<%@ Page Language="VB" AutoEventWireup="True" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %><html>
   <script runat="server">
     dim MyConnection as OleDbConnection
     dim cmdSelect as OleDbCommand
     dim dtrReader as OleDbDataReader      Sub Page_Load(sender As Object, e As EventArgs) 
      MyConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=c:\inetpub\wwwroot\nhonline\datagrid\web_article\testcodes\07_changecolorindatagrid\data.mdb")         If Not IsPostBack Then 
            BindGrid()
         End If
      End Sub      Sub BindGrid() 
      Dim MyCommand As OleDbDataAdapter = new OleDbDataAdapter("select * from [faq]", MyConnection)
          Dim DS As DataSet = new DataSet()
          MyCommand.Fill(DS,"faq") 
          MyDataGrid.DataSource =DS.Tables("faq").DefaultView
          MyDataGrid.DataBind()
      End SubFunction PickColor(ByVal fldval As Double) As String
    Dim color As String
    If fldval mod 2 = 0 Then
       color = "Red"
       Return color
    Else
       color = "green"
       Return "green"
    End If
End Function Sub DataGrid1_ItemDataBound(sender as object , e as System.Web.UI.WebControls.DataGridItemEventArgs)if(e.Item.ItemType=ListItemType.AlternatingItem or e.Item.ItemType=ListItemType.Item) then'e.Item.Attributes("onmouseout")="this.style.backgroundColor='#FFffcc'"
'e.Item.Attributes("onmouseover")="this.style.backgroundColor='white'"
e.Item.Attributes.Add("onmouseover", "this.style.backgroundColor='Silver'") 
e.Item.Attributes.Add("onmouseout", "this.style.backgroundColor='white'")  
e.Item.Cells(2).Style("cursor") = "hand"
end if
End Sub
</script>
<body>
   <form runat="server">
      <h3> DataGrid Custom Paging Example </h3>
      <asp:DataGrid id="MyDataGrid" 
   AutoGenerateColumns="false"
           runat="server"
   OnItemDataBound="DataGrid1_ItemDataBound"
>
  <Columns>
    <asp:BoundColumn DataField="ID" HeaderText="ID"></asp:BoundColumn>
<asp:BoundColumn DataField="faqid" HeaderText="FAQID"></asp:BoundColumn> 
 <asp:BoundColumn DataField="description" HeaderText="DESCRIPTION"></asp:BoundColumn> 
 <asp:TemplateColumn HeaderStyle-HorizontalAlign=Center  HeaderText="DESCRIPTION_2">
 <ItemTemplate>
 <asp:HyperLink id="HyperLink1"
                NavigateUrl="url"
                Text='<%# DataBinder.Eval(Container.DataItem, "DESCRIPTION") %>'
                Target="window"
                runat="server"/>
 </ItemTemplate> 
 </asp:TemplateColumn> 
  </Columns> 
</asp:DataGrid>
   </form>
</body>
</html>