public extern static Int32 GetThemeColor(IntPtr hTheme, int iPartId, int iStateId, int iPropId, out COLORREF pColor);

Declare Function GetThemeColor Lib "uxtheme.dll" (TODO) As TODO

Shared Function GetThemeColor(ByVal hTheme As IntPtr, _