在DataGrid中如何对某一行根据不同条件设置不同的颜色字体等属性？

Dim itemColor As Color
        Dim fromDate As String
        Dim toDate As String
               itemColor = New Color
        If dgdProcess.Items.Count <> 0 Then
            Dim i As Integer
            For i = 0 To CInt(dgdProcess.Items.Count - 1)                fromDate = dgdProcess.Items(i).Cells(6).Text
                toDate = dgdProcess.Items(i).Cells(7).Text
                toDate = Left(toDate, 4) & "-" & Mid(toDate, 5, 2) & "-" _
                    & Mid(toDate, 7, 2)
                fromDate = Left(fromDate, 4) & "-" & Mid(fromDate, 5, 2) & "-" _
                    & Mid(fromDate, 7, 2)
                dgdProcess.Items(i).Cells(6).Text = fromDate
                dgdProcess.Items(i).Cells(7).Text = toDate
                dgdProcess.Items(i).Cells(9).Text = dgdProcess.Items(i).Cells(9).Text & "%"                If dgdProcess.Items(i).Cells(10).Text = "準備中" Then
                    dgdProcess.Items(i).Cells(10).ForeColor = itemColor.HotPink
                End If
                If dgdProcess.Items(i).Cells(10).Text = "進行中" Then
                    dgdProcess.Items(i).Cells(10).ForeColor = itemColor.Green
                End If
                If dgdProcess.Items(i).Cells(10).Text = "完了" Then
                    dgdProcess.Items(i).Cells(10).ForeColor = itemColor.Black
                End If
                If dgdProcess.Items(i).Cells(10).Text = "延遅" Then
                    dgdProcess.Items(i).Cells(10).ForeColor = itemColor.Red
                End If
                If dgdProcess.Items(i).Cells(10).Text = "不明" Then
                    dgdProcess.Items(i).Cells(10).ForeColor = itemColor.DarkRed
                End If            Next
        End If
一大段东西都给你,Items(i)表示行,dgdProcess.Items(i).Cells(j)表示行中某一列
看看有没有用.

解决方案 »

  1.   

    看看,如是偶數時,顯示紅色:
    <%@ 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 
    </script>
    <body>
       <form runat="server">
          <h3> DataGrid Custom Paging Example </h3>
          <asp:DataGrid id="MyDataGrid" 
       AutoGenerateColumns="false"
               runat="server">
      <Columns>
         <asp:TemplateColumn > 
              <HeaderTemplate > 
                <table border=0 width="100%"> 
                    <tr> 
                       <td>ID
                       <td>FAQID
                       <td>DESCRIPTION
              </HeaderTemplate> 
         <ItemTemplate > 
             <tr> 
                <td><%#DataBinder.Eval(Container.DataItem , "ID")%></td>
                <td><font Color ="<%#PickColor(DataBinder.Eval(Container.DataItem , "faqid"))%>"><%#DataBinder.Eval(Container.DataItem , "faqid")%></font></td> 
                <td> 
                <%#DataBinder.Eval(Container.DataItem , "description")%></td>
             </tr>
        </ItemTemplate> 
        <FooterTemplate > 
          </table>
         </FooterTemplate>
      </asp:TemplateColumn>
    </Columns> 
          </asp:DataGrid>
       </form>
    </body>
    </html>