Simple transparent button control For VB6
Private Sub Form_Load() Me.Picture = LoadPicture(App.Path & "\bg.jpg") 'MyButton1(0).FilePath = "bt1a.png" 'MyButton1(0).FileClick = "bt1b.png" End Sub Private Sub Form_Activate() If Me.Tag = ""...
View ArticleVB6 Png Control,Simple transparent button control For VB6
Simulate the control transparency effect: the developed custom control usercontrol sets a screenshot function as the base image, bitblt draws the background image on the form (or screenshots with other...
View Articlehow to use alpha png for buttons,Transparent toolbar Control by vb6
it's use ImageList1.MaskColor ,how to use alpha png for buttons ?or use api without imagelist control ? [VB6] ListView / TreeView Extended and Custom Checkboxes-VBForums...
View Article(VB6) Add-In - Move selected controls
Move several controls certain left and/or top at the same time. Not sure if other add-ins do this (probably), but one feature that the VB6 IDE lacks is the ability to move all the selected controls at...
View ArticleMore Misc Programs
Here are 8 more misc programs from my unfinished folder. They are : Create Dummy Files , DrawOnForm with floodfill, Filename generator, Morse Code, Names List Maker, On/off usercontrol, random Strings,...
View ArticleXML Class to read & write
Hi. I am wondering if anyone has a drop in class that is easy to read & write nested xml files. Ive seen and got a few that read very basic xml files. but i am not good enough to make it read &...
View ArticleAbbreviate Text
This has very little use but I enjoyed the programming. Can be used to create control labels. See what you think about it. Attached Images Attached Files Abbrev.zip (3.9 KB)
View ArticleVB6 SQL-queryable Resources, based on ZipContainer-Files
This Demo has a dependency to RC6 (but would work with RC5 as well). The framework-dependency was included, to be able to conveniently "Select" resource-data via SQL - (from the ZipFile - InMemory......
View ArticleName Generator
Create male names, female names, with or without middle initial and can add Mr. and Mrs. Code is simple and straight forward. Names list can be saved .I'd load a snapshot but not uploading it for some...
View ArticleVB6 Office ribbon Activex Control,ribbon Ocx
Code: .AddTab "tab2", "Tab 2", True .AddCat "cat2", "tab2", "Group 1", False, "" .AddButton "but8", "cat2", "Search1", "save", False, "", False .AddCat "cat3", "tab2", "Group 2",...
View ArticleAccess the VBIDE library without add-ins
I recently had to document the methods of a vast class module. Means I wanted the names of all public functions listed in the module itself in a special procedure to give the opportunity to call them...
View Articlevb6 Fast ReadLine,QuickSplit(Like streamReader.ReadLine)
quick split is 132% faster than line input If you use pointers, you don't need to have MidB$ for each line of string, will it be faster? If the file keeps increasing data, only the newly added content...
View Article(VB6) Turn multiline text into String constant
This is an auxiliary code that takes a text from the clipboard and generates code for a constant declaration, then copies it back to the clipboard converted. Code: Option Explicit Private Function...
View Article[VB6, Vista+] Core Audio - Peak Meter
Core Audio - Peak Meter This demo is in a response to a question by Peterd51, asking if there was a way to detect if audio was playing. CoreAudio provides an easy way to watch peaks for a peak meter,...
View ArticleBingo with 2 Playing Cards
My version of programming a Bingo game. Its not fancy but I think its working. Suggestions are welcome. If someone knows how to make it print out the cards that would be great. Attached Images...
View Articlevb6 Fast ReadFile, ReadLine,QuickSplit(Like streamReader.ReadLine)
Read Filex Text by: (UTF8 IS FAST than StrConv) StrConv(bytes,vbUnicode): 452 ms Utf8text FileRead:286MS read unicode text :s=block() as byte 170.6ms read unicode text by Pointer: 117ms Code:...
View Articlevb6 Get Control Hwnd,Webbrowser Hwnd,Get Activex Control Hwnd
This is a great invention, I wonder if you have a better way? It took a few hours to complete. Its not easy. If you are interested, try some suggestions. if usercontrol with windowless=true,also can...
View ArticleVery Nice,Transparent user control by vb6
Transparent user control (copy the control in the background of the parent window to achieve a transparent effect) Two background pictures (001.jpg, 002.jpg), one larger and the other smaller. Please...
View ArticleHow to get the effective area of the picture by vb6?
A PNG image with a transparent channel, for example, where does the left start with pixels and the top start with pixels? Add a border to the active area of the image.
View Article