'************************************** 'Windows API/Global Declarations for :A ' Complete Web Browser '************************************** Option Explicit 'autocomplete textbox Private Declare Sub SHAutoComplete Lib "shlwapi.dll" (ByVal hwndEdit As Long, ByVal dwFlags As Long) Private Const SHACF_AUTOAPPEND_FORCE_OFF = &H80000000 Private Const SHACF_AUTOAPPEND_FORCE_ON = &H40000000 Private Const SHACF_AUTOSUGGEST_FORCE_OFF = &H20000000 Private Const SHACF_AUTOSUGGEST_FORCE_ON = &H10000000 Private Const SHACF_DEFAULT = &H0 Private Const SHACF_FILESYSTEM = &H1 Private Const SHACF_URLHISTORY = &H2 Private Const SHACF_URLMRU = &H4 Private Const SHACF_USETAB = &H8 Private Const SHACF_URLALL = (SHACF_URLHISTORY Or SHACF_URLMRU) 'progress bar in status bar Private Declare Function SetParent Lib "user32" _ (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long