Cylinder projection to 2D globe
This belongs in Games and Graphics but it seems that posting rates are so low nobody goes there. But a mod could always move this too. I was curious as a non-graphics programmer how people do things...
View ArticleVS 2019 Strange One - Comboboxes highlight when TableLayoutPanel is Dock = Fill
Hi, I've used this arrangement in other projects and not had this problem. I have a TableLayoutPanel within a Panel, the TableLayoutPanel has multiple rows containing ComboBoxes, TextBoxes and...
View ArticleHow to SOMETIMES pass an array to a function
I need to pass an array to a function. However, sometimes I don't want that to happen. In other words, I need to write a function that should look at the input array to see if it exists, do something,...
View ArticleBatch Copy Files
I am looking for a way to copy a batch of files from 1 directory to another in VB6. i.e. Copy C:\SourceDirectory\*.* C:\DestinationDirectory\*.*
View Article[RESOLVED] toolstripmenuitem toolstriptext appears
Hi, I have a Contextmenustrip with items, the problem I am facing is that the tooltip aka toolstriptext appears behind a child toolstripmenuitem of the current one: Is there a way to fix this? Thanks....
View Article[RESOLVED] Why don't we use double quotes when working with variables?
Hi, while writing a cell address in a range object I need to use double quotes example: range("B5").select But when I use variables for defining an address I don't require double quotes example:...
View ArticleVS 2019 RichTextBox - add columns to existing table?
In a Rich Text Box, is it possible to add/remove columns in a table? If yes, how? Thanx
View Articlehow to Draw rounded rectangle by vb6 GDI++?Draw a triangle
I want to draw various shapes, I wonder if you have the simplest example. Such as five-pointed star, trapezoid, prismatic, etc. Code: Private Sub DrawRoundRectangle(Graphics As Long, Pen As Long, X As...
View Articlehow to transparency Button like Listbox by vb6?
Code: Option Explicit Private Declare Function ReleaseCapture Lib "user32" () As Long Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long,...
View ArticleHow to make the length of module name and class name exceed 39?
We know that the length of module name and class name in VB6 is not allowed to exceed 39, but this will cause a lot of trouble. Because of the readability of modern programs, the length of many module...
View ArticleIn a very large project, how to deal with thousands of interface classes?
I'm doing some extreme tests on the VB6 project. In the test, a VBP project contains thousands of classes and thousands of Interface (classes). In the process of loading VBP, the prompt "Out of memory"...
View ArticleVS 2017 LINQ question
I'm a LINQ newbie...seen lots of code examples here but have no clue how to do it. Let's say I've got this list(of string)... Code: BookAbbrList = New List(Of List(Of String)) From {...
View ArticleSingle Room Air Conditioner
Hello everybody, been a while since I've been in these parts. Hope all are well. Looking for some advice on single room air conditioners. Working from home for a year plus and have had some issues with...
View ArticleFile in Internet or Restricted Zone
Hi, This is a weird one. Has anyone encountered this error before? Any ideas on how to fix this issue? Thanks, Robert Quote: Severity Code Description Project File Line Suppression State Error Couldn't...
View Article[RESOLVED] File in Internet or Restricted Zone
Hi, This is a weird one. Has anyone encountered this error before? Any ideas on how to fix this issue? Thanks, Robert Quote: Severity Code Description Project File Line Suppression State Error Couldn't...
View Articlehow to show svg by vb6?
iconfont-******* vector icon library In WIN8 system, the webbrowser control shows SVG images with jaggedness, and it is normal with IE11 and the Google browser kernel. Code: Private Sub...
View ArticleEXCEL cell displays the picture by Url,but not save the bitmap to the file
Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Target If Left(.Value, 7) = "http://" Or Left(.Value, 8) = "https://" Then ActiveSheet.Shapes.AddPicture(.Value, msoTrue, msoFalse,...
View ArticleDoes anyone want to help me with my project
Dear VBFormers, I wish for one of you or more of you, to help me with my current project. Here you can use a single file video player with videos internallaized into the single file, itself.... !!...
View ArticleVS 2019 Put Element in WebBrowswer in label with tagname
Hello everyone! I would like to put in a label a text from webbrowser. There is one problem: this element doesn't have an ID. How can put this text in a label using tag name? The HTML code is: HTML...
View Article