Private Declare Function HtmlHelpTopic Lib “hhctrl.ocx” Alias “HtmlHelpA” _ (ByVal hwnd As Long, ByVal lpHelpFile As String, ByVal wCommand As Long, _ ByVal dwData As String) As Long’A HTML Help file is composed by many HTML pages, compiled in one CHM file.’This routine opens the HTML Help browser loading the
Private Declare Function WNetConnectionDialog Lib “mpr.dll” (ByVal hwnd As Long, _ ByVal dwType As Long) As LongPrivate Declare Function WNetDisconnectDialog Lib “mpr.dll” (ByVal hwnd As Long, _ ByVal dwType As Long) As Long ‘ show the dialog to connect/disconnect a network disk” If the argument is True it shows the
Option ExplicitPrivate Declare Function SHGetPathFromIDList Lib “shell32.dll” Alias _ “SHGetPathFromIDListA” (ByVal pidl As Long, ByVal pszPath As String) As LongPrivate Declare Function SHGetSpecialFolderLocation Lib “shell32.dll” (ByVal _ hwndOwner As Long, ByVal nFolder As Long, pidl As ITEMIDLIST) As LongPrivate Declare Function SHBrowseForFolder Lib “shell32.dll” Alias _ “SHBrowseForFolderA” (lpBrowseInfo As BROWSEINFO)
Private Type ChooseColorStruct lStructSize As Long hwndOwner As Long hInstance As Long rgbResult As Long lpCustColors As Long flags As Long lCustData As Long lpfnHook As Long lpTemplateName As StringEnd TypePrivate Declare Function ChooseColor Lib “comdlg32.dll” Alias “ChooseColorA” _ (lpChoosecolor As ChooseColorStruct) As LongPrivate Declare Function OleTranslateColor Lib “oleaut32.dll” (ByVal
Private Declare Function WNetConnectionDialog Lib “mpr.dll” (ByVal hwnd As Long, _ ByVal dwType As Long) As LongPrivate Declare Function WNetDisconnectDialog Lib “mpr.dll” (ByVal hwnd As Long, _ ByVal dwType As Long) As Long ‘ Show the dialog to connect/disconnect a network printer’ If the argument is True it shows the
Private Declare Sub Sleep Lib “kernel32” (ByVal dwMilliseconds As Long)’ Show a form with an explosion effect.’ the lNumSteps parameter is the number of steps to increase the form size from ‘ 0 to the original size’ the lStepDuration argument is the number of milliseconds between each step’ Example:’ Private