Tip Bank

When you plan to create more control of the same type you can save some clicks by selecting the control on the Toolbox with the mouse while you press the

Declare Function SendMessage Lib “user32” Alias “SendMessageA” (ByVal hwnd As _ Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongDeclare Function GetWindowLong Lib “user32” Alias

‘ make a modeless form modal” this procedure should be called by passing TRUE’ in the 2nd argument to make the form modal, and’ called again with FALSE in the

The Microsoft Multimedia Control lets you easily determine the total playing time of an Audio CD: you only need to correctly initialize the control and then decipher the value returned

The following is a template for building collection class modules in a very quick and effective way. Copy-and-paste this code into Notepad, that save it to a file named “COLLECTION

Private Type RECT Left As Long Top As Long Right As Long Bottom As LongEnd TypePrivate Declare Function GetClientRect Lib “user32” (ByVal hWnd As Long, _ lpRect As RECT) As

Private Type RECT Left As Long Top As Long Right As Long Bottom As LongEnd TypePrivate Const SPI_GETWORKAREA = 48Private Declare Function SystemParametersInfo Lib “user32” Alias _ “SystemParametersInfoA” (ByVal uAction

Private Const SPI_SETSCREENSAVEACTIVE = 17Private Const SPI_GETSCREENSAVEACTIVE = 16Private Const SPIF_SENDWININICHANGE = &H2Private Const SPIF_UPDATEINIFILE = &H1Private Declare Function SystemParametersInfo Lib “user32” Alias _ “SystemParametersInfoA” (ByVal uAction As Long, ByVal

Private Type RECT Left As Long Top As Long Right As Long Bottom As LongEnd TypePrivate Declare Function GetWindowRect Lib “user32” (ByVal hWnd As Long, _ lpRect As RECT) As