Android Question help..help needed about set color to a row in b4xtable

Sub B4XTable1_DataUpdated    
    SetRowColor(4)    '5th row
End Sub

Sub SetRowColor(in As Int)    'rowid-1
    Dim SelectionColor As Int = 0xFFFFD700
    For i = 0 To B4XTable1.VisibleRowIds.Size - 1
        Dim RowId As Long = B4XTable1.VisibleRowIds.Get(i)
        For Each c As B4XTableColumn In B4XTable1.Columns
            Dim pnl As B4XView = c.CellsLayouts.Get(i+1)            
            If RowId = in+1 Then
                pnl.Color=SelectionColor
            Else
                If i Mod 2 = 0 Then
                    pnl.Color = B4XTable1.EvenRowColor
                Else
                    pnl.Color = B4XTable1.OddRowColor
                End If
            End If
        Next
    Next
End Sub