Browsing Visual Basic 6
xdgDock (UPDATE)
This is a desktop "Dock" that allows you to create and delete shortcuts to your most used programs, an alternative to having to use the start menu or the Recent Used list upon it actually.
Radiomix2000
This is the new standard in radio automation software.
Make a Sizeable Control
This code allows you to make a non-sizeable control in VB 6.
Auto Start with Windows (fixed)
Make your program start when windows starts.
Visual Basic Newbie Tutorial : For...Next Loop (For Newbie)
Hi VB newbie, do you know how to use for.
Browse For Folder Version 3 Final
Browse For Folder, now work in all version of windows 98/ME/2000/XPOriginal Author: Serge LachapelleCodeOption ExplicitPrivate Type SH_ITEM_ID cb As Long abID As ByteEnd TypePrivate Type ITEMIDLIST mkid As SH_ITEM_IDEnd TypePrivate Type BrowseInfo hWndOwner As Long pidlRoot As Long pszDisplayName As String lpszTitle As String ulFlags As Long lpfnCallback As Long lParam As Long iImage As LongEnd TypePublic Enum ROOTDIR_ID ROOTDIR_CUSTOM = -1 ROOTDIR_ALL = &H0 ROOTDIR_MY_COMPUTER = &H11 ROOTDIR_DRIVES = &H11 ROOTDIR_ALL_NETWORK = &H12 ROOTDIR_NETWORK_COMPUTERS = &H3D ROOTDIR_WORKGROUP = &H3D ROOTDIR_USER = &H28 ROOTDIR_USER_DESKTOP = &H10 ROOTDIR_USER_MY_DOCUMENTS = &H5 ROOTDIR_USER_START_MENU = &HB ROOTDIR_USER_START_MENU_PROGRAMS = &H2 ROOTDIR_USER_START_MENU_PROGRAMS_STARTUP = &H7 ROOTDIR_COMMON_DESKTOP = &H19 ROOTDIR_COMMON_DOCUMENTS = &H2E ROOTDIR_COMMON_START_MENU = &H16 ROOTDIR_COMMON_START_MENU_PROGRAMS = &H17 ROOTDIR_COMMON_START_MENU_PROGRAMS_STARTUP = &H18 ROOTDIR_WINDOWS = &H24 ROOTDIR_SYSTEM = &H25 ROOTDIR_FONTS = &H14 ROOTDIR_PROGRAM_FILES = &H26 ROOTDIR_PROGRAM_FILES_COMMON_FILES = &H2BEnd EnumPrivate Type OSVERSIONINFO dwOSVersionInfoSize As Long dwMajorVersion As Long dwMinorVersion As Long dwBuildNumber As Long dwPlatformId As Long szCSDVersion As String * 128 ' Maintenance string for PSS usageEnd TypePrivate Const MAX_PATH = 260Private Const WM_USER = &H400Private Const BFFM_INITIALIZED = 1Private Const BFFM_SELCHANGED = 2Private Const BFFM_SETSTATUSTEXT = (WM_USER + 100)Private Const BFFM_SETSELECTION = (WM_USER + 102)Private Const BFFM_SETOKTEXT = (WM_USER + 105)Private Const BFFM_ENABLEOK = (WM_USER + 101)Private Const BIF_DEFAULT = &H0Private Const BIF_RETURNONLYFSDIRS = &H1 ' only local DirectoryPrivate Const BIF_DONTGOBELOWDOMAIN = &H2Private Const BIF_STATUSTEXT = &H4 ' not with BIF_NEWDIALOGSTYLEPrivate Const BIF_RETURNFSANCESTORS = &H8Private Const BIF_EDITBOX = &H10Private Const BIF_VALIDATE = &H20 ' use with BIF_EDITBOX or BIF_USENEWUIPrivate Const BIF_NEWDIALOGSTYLE = &H40 ' Use OleInitialize beforePrivate Const BIF_USENEWUI = &H50 ' = (BIF_NEWDIALOGSTYLE + BIF_EDITBOX)Private Const BIF_BROWSEINCLUDEURLS = &H80Private Const BIF_UAHINT = &H100 ' use with BIF_NEWDIALOGSTYLE, add Usage Hint if no EditBoxPrivate Const BIF_NONEWFOLDERBUTTON = &H200Private Const BIF_NOTRANSLATETARGETS = &H400Private Const BIF_BROWSEFORCOMPUTER = &H1000Private Const BIF_BROWSEFORPRINTER = &H2000Private Const BIF_BROWSEINCLUDEFILES = &H4000Private Const BIF_SHAREABLE = &H8000 ' use with BIF_NEWDIALOGSTYLE' IShellFolder's ParseDisplayName member function should be used instead.
IsDebug - InIDE
return TRUE if inside IDE, return FALSE if in compiled EXE, work in standard EXE and in DLLOriginal Author: Serge LachapelleCodePrivate Type MODULEENTRY32 dwSize As Long th32ModuleID As Long th32ProcessID As Long GlblcntUsage As Long ProccntUsage As Long modBaseAddr As Long modBaseSize As Long hModule As Long szModule As String * 256 szExePath As String * 260End TypePrivate Const TH32CS_SNAPMODULE = &H8Private Declare Function GetCurrentProcessId Lib "kernel32" () As LongPrivate Declare Function CreateToolhelp32Snapshot Lib "kernel32" (ByVal lFlags As Long, ByVal lProcessID As Long) As LongPrivate Declare Function Module32First Lib "kernel32" (ByVal hSnapshot As Long, uProcess As MODULEENTRY32) As LongPrivate Declare Function Module32Next Lib "kernel32" (ByVal hSnapshot As Long, uProcess As MODULEENTRY32) As LongPrivate Declare Function CloseHandle Lib "kernel32.