You can programmatically start the Shortcut Wizard from your code, to give the end user the capability to create a new shortcut: Shell “rundll32.exe AppWiz.Cpl, NewLinkHere ” & App.Path, 1
Private Declare Function ExtractIcon Lib “shell32.dll” Alias “ExtractIconA” _ (ByVal hInst As Long, ByVal lpszExeFileName As String, _ ByVal nIconIndex As Long) As LongPrivate Declare Function DrawIcon Lib “user32” (ByVal
‘ CCONSOLE Class” Creates a console window and writes to it’ Example:’ Dim cons As New CConsole’ cons.WriteString “Hello World”Private Declare Function AllocConsole Lib “kernel32” () As LongPrivate Declare Function
Option ExplicitPrivate Type RECT Left As Long Top As Long Right As Long Bottom As LongEnd TypePrivate Enum mbBorderTypeConstants mbRaised = 0 mbSunken = 1 mbEtched = 2 mbBump =
Private Declare Sub mouse_event Lib “user32” (ByVal dwFlags As Long, _ ByVal dx As Long, ByVal dy As Long, ByVal cbuttons As Long, _ ByVal dwExtraInfo As Long)Private Const MOUSEEVENTF_LEFTDOWN