Clik here to view.
VB6 Capture Pixel from Screen
Gets the pixel color from desktop. Can keep up to 5 colors per session. I find it very helpful when creating graphics for my apps. Give it a try. Enjoy. (please no comments on this or the world will...
View ArticleClik here to view.
VB6 Project Folder Creator
This will create and add a project folder with selected sub folders(Usercontrol,Classes,Modules,etc). Attached Images Attached Files Project Folder Maker.zip (3.1 KB)
View ArticleVB6 Locks up at breakpoint in Windows 10
I've got VB6 installed and running in Windows 10 after following some tips. Unfortunately, it doesn't behave right. For example, when I set a BREAKPOINT and then RUN the app, it stops at the...
View ArticleClik here to view.
User Control Assistant 2
This is a remake of my previous submission. You can now generate all properties at the same time, except for Font property, which uses a separate button . Lists can be edited to your needs. Hope this...
View ArticleClik here to view.
PicServer as Service
PicServer has been made into a service. It is quite a bit more complex than the original, and is called PicSvc. PicSvc requires the use of NTSVC.ocx. To allow some trouble shooting in the IDE, PicSvc...
View ArticleSystem Wide Got/Lost Focus (subclassing)
This is just a small example of how one might accomplish system wide GotFocus and LostFocus events in VB6. The way it's setup, it's fairly IDE safe. With the Comctl32 subclassing, there are only two...
View ArticleInputBox With Password mask,Get screen coordinate position of the input box
Code: Private Sub Form_Load() InputX = 300 * Screen.TwipsPerPixelX InputY = 500 * Screen.TwipsPerPixelY End Sub Private Sub Command1_Click() Dim S As String S = InputboxXY("Please Input Your...
View ArticleAdjust the size of the borderless window-VB6
Code: Private Const WM_NCLBUTTONDOWN = &HA1 Private Const HTLEFT = 10 Private Const HTRIGHT = 11 Private Const HTTOP = 12 Private Const HTBOTTOM = 15 Private Const HTBOTTOMRIGHT = 17 Private Const...
View ArticleClik here to view.
VB6 Flip Digit Style Clock from the 70's
Very simple clock code with the graphics that look similar to the flip digit clocks from the 70's . Added the date just for grins Attached Images Attached Files FlipDigits Clock_Date.zip (8.5 KB)
View ArticleClik here to view.
VB6 Rolling3Digits BitBlt
Just threw this together to have something to do . Does'nt really do much, but looks neat. It can only display numbers not add or subtract. Maybe someone will find something useful in it. Maybe even...
View ArticleEdge Webview2 Automatic installation, detect the installed version
Code: Function CheckSetupOk() As Boolean 'It takes 10 seconds to check whether the edge runtime component is installed successfully. Is there a faster method? Dim WV As cWebView2 Set WV =...
View ArticleCheck if it is a 64-bit operating system
Code: Private Declare Function GetModuleHandle Lib _ "kernel32" Alias "GetModuleHandleA" ( _ ByVal lpModuleName As String) As Long Private Declare Function LoadLibrary Lib _...
View Articlehook createProcess with wmi
Code: Private Sub Command2_Click() Check1.Value = 0 End Sub Private Sub Command1_Click() 'ADD CONTROLS:Command1,Command2,List1,check1 Check1.Value = 1 strComputer = "." Set objWMIService =...
View ArticleSuper fast running image rotation
This is the first method, which is slower and has no extra white edges. The second method is faster Code: Private Type Bitmap bmType As Long 'Image type: 0 means bitmap bmWidth As Long 'Image width...
View ArticleConvert 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 ArticleVoice chat over lan in word environment
I've been finding some threads about voice chat over LAN, but they are in VB.net, and do not work in VB.net or VB. My program is in the MS Word Environment (VBE). I am creating a medical report writing...
View ArticleClik here to view.
VB6 Capture Pixel from Screen
Gets the pixel color from desktop. Can keep up to 5 colors per session. I find it very helpful when creating graphics for my apps. Give it a try. Enjoy. (please no comments on this or the world will...
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 Article