_shadowPanel.BackColor = Color.FromArgb(32, Color.Honeydew)

        Public Shared Function MixColors(ByVal c1 As Color, ByVal c2 As Color) _
          As Color
            Dim _r As Integer, _g As Integer, _b As Integer
 
            _r = Math.Min((CInt(c1.R) + CInt(c2.R)), 255)
            _g = Math.Min((CInt(c1.G) + CInt(c2.G)), 255)
            _b = Math.Min((CInt(c1.B) + CInt(c2.B)), 255)
 
            Return Color.FromArgb(Convert.ToByte(_r), _
                     Convert.ToByte(_g), _
                     Convert.ToByte(_b))
        End Function

Gru?
(Bash)