Private Declare Function OleTranslateColor Lib "OLEPRO32.DLL" (ByVal OLE_COLOR _ As Long, ByVal HPALETTE As Long, pccolorref As Long) As Long' convert a VB color constant to a COLORREF' accepts both RGB() values and system color constantsFunction TranslateColor(ByVal clr As Long) As Long If OleTranslateColor(clr, 0, TranslateColor) Then TranslateColor = -1 End IfEnd Function


The Best Mechanical Keyboards For Programmers: Where To Find Them
When it comes to programming, a good mechanical keyboard can make all the difference. Naturally, you would want one of the best mechanical keyboards for programmers. But with so many