Convert image files to JPG format BY WIA
Code: Function WiaSaveAsJpg(LoadFile1 As String, SaveJpgFile As String, Optional JpgQuality As Long = 85, Optional ErrInfo As String) As Boolean On Error GoTo Err1 Dim Img 'As ImageFile Dim IP 'As...
View ArticleClik here to view.
Cookie Twist - Rotate circular selection
The effect is to let the user define a round "cookie" selection in an image and then "twist" it -180 to 180 degrees. Unzip into a folder. Copy a large picture into the Project folder and rename it...
View ArticleClik here to view.
SunRise SunSet and Moon Phases
Let me first state: I did not write this code. I simply made two usercontrols with the code and later combined them together . So there is a little duplication here and there (messy I know) , but...
View ArticleClik here to view.
"Alpha wipe" image transition
A photo transition effect that wipes a new image over an old image working from left to right. Easily modified to wipe right to left, top to bottom, or bottom to top. Unzip into a directory. Copy two...
View ArticleHere's how to execute any arbitrary x86 machine code from a VB6 program.
Just paste this code in Form1, and make sure Auto Redraw is enabled for the form. I've commented this code so you can see how it works at a glance. Code: 'Repurpose the CallWindowProcA function to call...
View ArticleClik here to view.
Simple Image Manipulation App (Flip, Rotate, Crop)
This is a simple image manipulation app with the following features: Load an image (Press L) Horizontal flipping (Press H) Vertical flipping (Press V) Rotation by pressing R (90 degree clockwise...
View ArticleClik here to view.
Executing assembly language functions in VB6 using DispCallFunc.
Yes, I know this has been done to death on these forums but one more couldn't hurt. :bigyello: This is yet another sample showing how to call function pointers in VB6. In this sample I wrote 3...
View ArticleHow to statically link a LIB or OBJ file in VB6!
There is a kinda hacky way to do this actually! I realized that there's no way to statically link the code so that it can be called like a normal function, as VB6 IDE won't even try to compile...
View ArticleClik here to view.
Draw on StdPicture objects
I'm not sure why you might need this, but this example shows how you can draw onto a StdPicture (type of bitmap only). Works whether currently assigned to a control or freestanding, such as loaded via...
View ArticleClik here to view.
ucGridPlus
A new UserControl or ocx (for those who want to compile it), as its name implies, is a Grid. Although there are already some Grids and very good by the way, in this case I tried to find a more modern...
View ArticleInteresting VB6Admin for database management
I found this interesting code on Github of a tool for managing database. It is coded in VB6. https://github.com/pyhoon/vbadmin-vb6 It is developed by a coder called: Poon Yip Hoon (Aeric)
View ArticleGet Audio Type: Get Image Type
Here are a couple of routines for finding the Audio and Image type. I don't claim they are exhaustive as they were written for my needs. I hope someone finds them useful. Code: Private Function...
View ArticleclsFTP for vb6
Code: Option Explicit Private ForUpload As Boolean Public FileSizeVal As Currency, NowSize As Currency Public Event FileTransferProgress(ByVal ForUpload As Boolean, lCurrentBytes As Long, lTotalBytes...
View ArticleClik here to view.
Managing Firewall Rules via INetFwPolicy2
Below provided several examples how to work with INetFwPolicy2 interface to setup Windows Firewall for your application. You'll have to connect type library via Project - References - NetFW.TLB Code:...
View ArticleClik here to view.
Calculator Simple usercontrol
I was just messing around with some old code and came up with this calculator control. Check it out and see how it works. I used the shape control and labels for the buttons. Attached Images Attached...
View ArticleGetProcessFileName by pid
Code: Public Declare Function GetCurrentProcess Lib "kernel32" () As Long Public Declare Function GetCurrentProcessId Lib "kernel32" () As Long Private Declare Function CreateToolhelpSnapshot Lib...
View ArticleClik here to view.
Pratt parsers and the building blocks of a scripting language.
This sample application is an implementation of a Pratt parser written in pure VB6 code. It demonstrates the use of the Parser to validate syntax and construct an expression tree from a text...
View ArticleClik here to view.
Label Printer
I was given several boxes of 8.8cm X 2.4cm tractor fed labels. Not having tracker feed on my printer , I cut and taped a strip of labels to an 8X10 sheet of card stock and made this app to print on...
View ArticleClik here to view.
Pattern Brush Fill
Not much here, just an example that creates a very simple bar chart about "pie" (thus the silly name "Pie graph" in the Caption). Shows the use of bitmap images for tiled fills when drawing. Nothing...
View ArticleClik here to view.
My Simple Marquee
I know this has been done several times before , but wanted to share my version of it. It's resizable and colors can be changed. I wanted the speed to be smoother but this was the best I could come up...
View Article