Category Archives: Visual Basic 6 (VB6)

True Always On top With API

True window always on top. Like MS toolbar.It floats over any active application is inactive but is still always on top.Allows you to switch between applications and window is still always on top!Much better than Jake McCurry’s lousy Always on top code. Original Author: Liu Yucheng Inputs Window Handle of Window to stay on top. Assumptions Nothing Returns Nothing… Read More »

Y2K Test for VB5 and 6

This program test the Visual Basic program you are currently running. As you will see. Original Author: Preston Smith Assumptions You can adjust the dates for Jan 1st 1930, Jan 1st 2029, Jan 1st 00 and Feb 29 or 30 2000. To see if your version is compliant then you should use 1/1/00 for the year 2000, and 2/29/00… Read More »

Easily Replace a character in a string

Replaces a character in a string with another character. Pretty simple to understand. Uses a For…Next loop. Original Author: Steve Berardi Code Function ReplaceCharacter(stringToChange$, charToReplace$, replaceWith$) As String’Replaces a specified character in a string with another’character that you specify  Dim ln, n As Long  Dim NextLetter As String  Dim FinalString As String  Dim txt, char, rep As String  txt = stringToChange$ ‘store all arguments… Read More »

Real C++ Buttons (Fixed)

Notice: THIS CODE HAS BEEN FIXED! PLEASE READ THE COMMENTS AT THE BOTTOM OF THE PAGE TO SEE WHAT WAS WRONG BEFORE.Create real C++ style command buttons with ONE line of code!!! You can use this code on any of your commands buttons. You will loose any images and the BackColor of the button, but that really doesn’t… Read More »

Animated GIF ActiveX control

This ActiveX allow you to use animated gifs in yourapplications. I saw examples of modules before butnot ActiveX.You can make OCX file from this and use itin other applications. Original Author: German Bletel Assumptions This is test application for using animated gif.ActiveX has Propertie: GifPath must be a valid pathto an animated gif fileMethods:StartGif – Loads gif and starts… Read More »

(Update) RC4 Stream Cipher (with file handling )

This code offers you a strong encryption with RC4. I’ve tested it a lot and it’s the right implementation of the RC4 cipher.‘You can use this code in your commercial code because it’s not patented!‘I know there is another code that deals with RC4 but my code has nothing to do with this code!‘More infos: sci.crypt Original Author: Sebastian… Read More »

Total Record Count In ADO Recordset

This simple little function just returns the total number of records in a ADO recordset. Original Author: Riaan Aspeling Inputs A ADODB.Recordset structure Returns A Long integer with the total number of records Side Effects I believe it’s not the fastest way of retrieving the information but at least it works. I’d like it if somebody can suggest a… Read More »

Make Form always on top without API !

It automatically makes your form on top until they close or end the program and it is all API free! Original Author: Jake McCurry Code ‘set the timer’s interval to 1Private Sub Timer1_Timer()Form1.ShowForm1.SetFocusEnd Sub

Turn your PictureBox into a ChildForm

Uses SetWindowLong to turn a PictureBox into a “Child Form”. Rather amazing to an unexperienced programmer.PS. Visit my new site: http://smartsite.cjb.net Original Author: Konstantin Tretyakov Attachments File Uploaded Size CODE_UPLOAD3315292000.zip 9/3/2020 3:45:00 PM 61754

Activate App with Hooking

Demonstrates how you can minimize your app to the system tray and reactivates it by double clicking on its registered file type in Windows Explorer, without leaving the second instance running.Covers three techniques:1-Hooking;2-Registry functions;3-SystemTray functions.VB6 tested OK. Original Author: Alexandre Moro Attachments File Uploaded Size CODE_UPLOAD33772132000.zip 9/3/2020 3:45:00 PM 11251