public extern static Int32 GetThemeRect(IntPtr hTheme, int iPartId, int iStateId, int iPropId, out RECT pRect);

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

Public Shared Function GetThemeRect(hTheme As IntPtr, iPartId As Integer, iStateId As Integer, iPropId As Integer, ByRef pRect As RECT) As Int32