Different background of the case

  '_row.DefaultCellStyle.BackColor = color_inCase' to pink background
            'above before, all of the case is a kind of background
            ' now following, different background of the case (depending on its ID case)
            Dim an IDR of As Integer the CInt = (_caseID.Substring (. 3,. 7)) * 25
            Dim of As Integer = idG of the CInt (_caseID.Substring (. 8, 2)) * 100 + the CInt (_caseID.Substring (. 6,. 4))
            Dim IDB of As Integer = the CInt (_caseID.Substring (. 7,. 3)) * 10
            an IDR = 255
            idG of idG of Mod = 255
            IDB IDB = 255 Mod

            Color = Color.FromArgb of As _Color Dim (an IDR, idG of, IDB)
            _row.DefaultCellStyle.BackColor = _Color 'background color to this