Function GetColorName(ByVal myColor as Color)as String
 
 
Return [enum].GetName(GetType(KnownColor), myColor.ToKnownColor)
End Function

Function GetColorName(ByVal myColor as Color)as String
 Return mycolor.ToString()
End Function

-----------------------------------
Betriebssystem: Schrott (Vista)
Entwicklungsumgebung: VS 2008