XtraGrid中細胞和行選擇使用的DevExpress的WinForms Vb.net

Question

Private Sub GridView1_RowCellStyle(sender As Object, e As 
    RowCellStyleEventArgs) Handles GridView1.RowCellStyle 
    Try 
     If IsDBNull(e.CellValue) Then 
      e.Appearance.BackColor = Color.LightYellow 
     End If 
     Dim selectedCells As GridCell() = GridView1.GetSelectedCells() 
     isRowSelected = GridView1.IsRowSelected(e.RowHandle) 
     For Each Cells In selectedCells 
      If GridView1.GetSelectedCells.Count = 1 Then 
       If IsDBNull(GridView1.GetRowCellValue(Cells.RowHandle, 
        Cells.Column)) Then 
        e.Appearance.BackColor = Color.LightYellow 
       End If 
      Else 
       If isRowSelected Then 
        If IsDBNull(GridView1.GetRowCellValue(Cells.RowHandle, 
         Cells.Column)) Then 
         e.Appearance.BackColor = Color.FromArgb(226, 234, 
          253) 
        End If 
       End If 
      End If 
     Next 
    Catch ex As Exception 
     MessageBox.Show(ex.Message) 
    End Try 
End Sub 

我使用的DevExpress。我聲明「的DBNull的價值應該是「Lightyellow'.After默認顏色我想成爲選擇行或「DbNull」值中的單元格更改藍色。我做錯了什麼？ 我想要選擇單元格或行來改變顏色（即null值）

Answer 1

在RowCellStyle事件處理程序中迭代所選單元沒有意義，因爲此事件僅針對單細胞。最終，它會提高所有可見的單元格。

因此，下面的代碼將足以完成你的任務：

Private Sub GridView1_RowCellStyle(ByVal sender As Object, ByVal e As RowCellStyleEventArgs) 
    Dim view As GridView = TryCast(sender, GridView) 
    Dim isRowSelected As Boolean = view.IsRowSelected(e.RowHandle) 
    If IsDbNull(e.CellValue) AndAlso (Not isRowSelected) Then 
     e.Appearance.BackColor = Color.Yellow 
    End If 
End Sub 

它是否適合你？

Answer 2

Dim state As GridRowCellState 
     state = DirectCast(e.Cell, GridCellInfo).State 
     If (state And GridRowCellState.Selected) = GridRowCellState.Selected Then 
      e.Appearance.BackColor = Color.FromArgb(226, 234, 253) 
     End If 

此代碼用於選擇單元格以更改您的外觀顏色。 GridRowCellState包含網格控件的外觀定製事件的行單元格狀態。選定單元格指定選擇當前正在處理的行/單元格。 This is My Output