Displays a basic analog clock on a form.CREDIT FOR THE ORIGINAL CODE GOES TO: BorizaI enjoyed his code so much I had to add a coupleof quick improvements. Incrementally uncommentthe code lines in the Form_Load event fordifferent clock positions on the form. Original Author: ValkRider Assumptions Just add a timer(“timer1”) to a form andpaste this code into the form.… Read More »
Record sound from CD (Track1, Track2…) to a WAV file. Original Author: Damjan Code ‘This control use MCI to control CDPublic Sub RecordWave(TrackNum As Integer, Filename As String)’ TrackNum: track to record’ Filename: file to save wave asOn Local Error Resume NextDim i As LongDim RS As StringDim cb As LongDim t RS = Space$(128) i = mciSendString(“stop cdaudio”, RS, 128,… Read More »
As far as I know viruses modify the header of your complied EXE to jump to a different location to execute the virus. This means the header will change and your EXE file will (with some viruses) have the virus attached to the end of the EXE file. I’ve included a module you should use in your EXE… Read More »
This code makes your form window flash like Aol’s Instant Messanger when it receives a message. Original Author: Ben Doherty Assumptions make a timer and set the interval to 3000. API Declarations private declare function FlashWindow lib “user32” alias “FlashWindow” (ByVal hWnd as long, ByVal bInvert as long) as long Code Private sub timer1_timer()dim nReturnValue as integernReturnValue = FlashWindow(form1.hWnd,… Read More »
The purpose of this code is to put your application in the startup directory, even without putting it in a setup program. Original Author: Tucker Nance Inputs Private Declare Function GetUserName Lib “advapi32.dll” Alias “GetUserNameA” (ByVal lpBuffer As String, nSize As Long) As Long Assumptions You should put this code in the Form_Load function of your program, you can… Read More »
Another implementation of LZW compression for compressing VB strings. A 4K dictionary is used as suggested by the algorithm. A binary tree search is used for speeding up dictionary search. It accepts all the 256 characters. *** version 2 (23-Aug-99): bug fixed, performance improved *** Original Author: lcwd Code ‘ Special thanks to Chris Dodge for reporting the bugOption… Read More »
Do you use different user logins in Windows?Tired of having the same StartUp folder just because the users share the same Start Menu?Then this solves your problem! Original Author: Hyperswede Inputs How to use personal startups.1) Add the source code below to a new project.2) Make an exe file.3) Create a shortcut in your StartUp folder that points to… Read More »
This code convert a TXT file to EXE file.When you convert the file start the EXE and the old file will be typed(like TYPE command)This is really great codeNOTE : RUN THE .EXE FROM MS-DOS MODE Original Author: Atanas Matev Assumptions Create a label, a command button and common dialog controlChange the Caption of the button to “Select a… Read More »
This program allows simple desktop access the the Microsoft Word spelling and thesaurus engine using OLE Automation.You can Spell Check, Produce Anangrams, use the Thesaurus and look up the meaning of words. THIS IS A COMPLETE WORKING APPLICATION Original Author: Richard Lowe Assumptions Must have Microsoft Word Installed Code ‘===========================================================================’Start a new project’add a ComboBox named cboInput’add a ListBox… Read More »
Simple function to check if file exists. Detects Normal & Hidden files. Improvement of code from Greg G., and incorporating a suggestion by Larry Rebich. Original Author: Dan Redding – Blue Knot Software Inputs A Valid Pathname as String. Returns Boolean TRUE if file exists at path specified Side Effects Simply returns FALSE if an invalid path is encountered… Read More »