Quantcast
Channel: VBForums - CodeBank - Visual Basic 6 and earlier
Browsing all 1479 articles
Browse latest View live
↧

Get Library Name by Com DLL with vb6

HOW to get Library Name by Com DLL with vb6? from : Library info.-VBForums https://www.vbforums.com/showthread....6-Library-info Library Excel c:\***\Office16\EXCEL.EXE Microsoft Excel 16.0 Object...

View Article


vb6 everything SDK,quick Search file for vb6,vba

Need Run EveryThing.exe First ! it's support x64 everything.exe,but un suppot about:Lite version Download Portable Zip 64-bit,it's only 2 files,it's funny (Everything.exe,Everything.lng),it's support...

View Article


Image may be NSFW.
Clik 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 Article

Edge 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 Article

Check 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 Article


Image may be NSFW.
Clik here to view.

VB6 Call Web Api GET

Hello friends:wave: I had a question about contacting the api : Connect via winhtt 5.1 I set up a connection and receive information from the web, but all at once I want to see if there is a way to...

View Article

hook 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 Article

Super 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 Article


Crop Filter: Crop Picture

Code: Dim Img 'As ImageFile Dim IP 'As ImageProcess Set Img = CreateObject("WIA.ImageFile") Set IP = CreateObject("WIA.ImageProcess") Img.LoadFile "C:\WINDOWS\Web\Wallpaper\Bliss.bmp" IP.Filters.Add...

View Article


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 Article

Image may be NSFW.
Clik 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 Article

Image may be NSFW.
Clik 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 Article

Voice 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 Article


Image may be NSFW.
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 Article

Code not reading entries !

l save some entries with the following code ...................................... Dim i Dim a1, b1, c1 As String Open "c:\xxxx\Entries.Dat" For Append As #2 For i = 1 To ItemCount Write #2, a1(i),...

View Article


WebSocket: recv function crash

So I wanted to have a nice File Download function with progress indication - I have it working in VC. Just translated it to VB6. All initializations looks fine - exactly same results as VC. HOWEVER,...

View Article

Image may be NSFW.
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 Article


Image may be NSFW.
Clik 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

Here'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 Article

Image may be NSFW.
Clik 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 Article
Browsing all 1479 articles
Browse latest View live


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>