A mettre dans un module, ou dans une classe:
Public MrdOrange As System.Drawing.Color = Color.Orange
Public MrdNoir As System.Drawing.Color = Color.Black
Public MrdRouge As System.Drawing.Color = Color.Red
Public MrdVertClair As System.Drawing.Color = Color.FromArgb(0, 255, 0)
Public MrdVertFoncé As System.Drawing.Color = Color.FromArgb(0, 192, 0)
Public MrdBleu As System.Drawing.Color = Color.FromArgb(0, 0, 255)
Public MrdMagenta As System.Drawing.Color = Color.FromArgb(255, 0, 255)
Public MrdCyan As System.Drawing.Color = Color.FromArgb(0, 255, 255)
Public MrdGrisClair As System.Drawing.Color = Color.FromArgb(192, 192, 192)
Public MrdBlanc As System.Drawing.Color = Color.White
Public MrdJaune As System.Drawing.Color = Color.Yellow
Public MrdGrisFoncé As System.Drawing.Color = Color.FromArgb(128, 128, 128)
Public MrdSaumon As System.Drawing.Color = Color.FromArgb(255, 192, 192)
Nota: les valeurs sont en RGB , alors qu’en VB6, elles sont en BGR (et en hexadécimal).