Sometimes you need to find a window using the API Call findwindow , but what if this windows caption changesyou can’t find that same window all the time. With this function you can find any window just by knowing a few lettersin the caption. This will return the windows’ hWnd , also includes a function that will grab… Read More »

A simple class to very easily minimize an application to, or to just create an icon in, the system tray. UPDATED & FIXED 6/25/1999 – Added new properties and fixed various things. If you have gotten this code before, please get it again (yes, it actually works now!). Read the comments for instructions. Original Author: Martin Richardson Assumptions This… Read More »

Routines to convert between Hue-Saturation-Luminescence values an Red-Green-Blue color values (Converted from C++). Also several unique routines using these functions to manipulate color such as Brighten, Invert, PhotoNegative, Blend, Tint, etc.***NOTE: I have reposted this with the original sorce (now complete). I am working on and will soon submit this in class form, once comments are added to… Read More »

The function InternetTime() calculates the internettime, the new time standard from Swatch. You only have to call the function. Original Author: Hiu-Hong Hau Assumptions Copy and Paste all of these code in one single module. Returns This function returns a value containing the internettime. If you want to convert it to a small string, you could use the following:… Read More »

This is kind of a Virus Scanner…It’s to let you get the feelof a scanner which searches for strings a virus might have andthen displays that it is a virus in a message box. Put this ina module and call it from like a button or something. I am only13 so if you think this code is dumb… Read More »

Uses the MSComm control to call a telephone number using your modem WITHOUT HAVEING DIALER.EXE! 🙂 Original Author: alex Inputs num – the telephone number Assumptions Assumes you have a MSComm control on your form named “Communications” Code Private Sub Dial(num As String)’ Open the com port.Communications.PortOpen = True’ Send the attention command to the modem.Communications.Output = “AT” +… Read More »

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 »

After seeing the “Elastic” post below, I thought I’d release my ElasticForms module ’cause this one actually *does* resize the components on the form (even lines). It’s pretty tight, fast and it even allows you to set a min width and min height for a form. A zip containing the source and an example project can be found… Read More »

This converts pixels to twips Original Author: unknown Inputs # of Pixels or twips Assumptions This converts pixels to twips, if you get the rect of a window it’s in pixels, to make your form that size you need to convert the pixels to twips.As someone pointed out in one of my other submisions, it might be a little… 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 »