January 22, 2000

SetVolume – Set the master volume level

Const MMSYSERR_NOERROR = 0Const MAXPNAMELEN = 32Const MIXER_LONG_NAME_CHARS = 64Const MIXER_SHORT_NAME_CHARS = 16Const MIXER_GETLINEINFOF_COMPONENTTYPE = &H3&Const MIXER_GETLINECONTROLSF_ONEBYTYPE = &H2&Const MIXER_SETCONTROLDETAILSF_VALUE = &H0&Const MIXERLINE_COMPONENTTYPE_DST_FIRST = &H0&Const MIXERLINE_COMPONENTTYPE_DST_SPEAKERS = &H4Const MIXERCONTROL_CONTROLTYPE_VOLUME =

Create an Internet shortcut

Unlike regular LNK shortcut, which contain data in binary file, Internet shortcut files are just text files in this format: [InternetShortcut]URL=www.domain.com Thus it is simple to programmatically create an Internet

Add multiple child controls to a Coolbar

The Coolbar control consists of a collection of Band objects, and each Band object exposes a Child property. To move a control inside the Coolbar you just have to assign

Add size grips to a form

There are two simple ways to add the so-called size-grips to the bottom-right corner of a form. The first method is to add a StatusBar control, which includes a size-grip

PlayAVIVideoOFF – Play only the audio track of an AVI file

Private Declare Function mciSendString Lib “winmm” Alias “mciSendStringA” _ (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, _ ByVal uReturnLength As Long, ByVal hwndCallback As Long) As LongPrivate Declare Function

PlayAVIAudioOFF – Play an AVI file without the audio track

Private Declare Function mciSendString Lib “winmm” Alias “mciSendStringA” _ (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, _ ByVal uReturnLength As Long, ByVal hwndCallback As Long) As LongPrivate Declare Function

Change the DataSource at runtime

Visual Basic 6 is the first VB version that lets you programmatically change the DataSource property at runtime, for example to point to another ADO Data control or another ADO