I have a function in VB6 with a calling list that looks like this
Public Function GetPol(Policy_Name As String, Optional Obj As Object = Nothing) As Variant
The purpose of this thing is that it can be invoked with multiple different class objects as the second argument. The code sorts out what...
I have a small application that I've been attempting to install on other machines. They are all XP-Pro laptops that have a third-party Web-Based application installed. That application requires that the .NET 2.0 framework be installed followed by a download of the various application components...
I just did this
x=cdate("04/22/2002")
? vartype(x)
7
? typename(7)
Integer
? typename(vartype(x))
Long
Why is the TypeName(7) returning "Integer" but TypeName(VarType(x)) (which should resolve to the same thing) is returning "Long"?
Here's one that I found in an old (1986) book on programming called Programming Pearls by John Bentley
The challenge is; given an array of numeric values such as
31, -41, 59, 26, -53, 58, 97, -93, -23, 84
write a program to find the maximum sum of a sub-array of contiguous values in the...
I know that the rule is "A" before a consonant sound and "An" before a vowel ... so why does
An UNION query
just sound wrong?
No! No! You're not thinking ... you're only being logical.
- Neils Bohr
I recently installed VB6 on a new XP-SP2 system and there seem to be a few weird problems with menu items and toolbars in the IDE.
The Standard tool bar is missing the "Find", "Undo" and "Redo" buttons and the "View" menu is missing the "Call Stack" option. If I select "Customize / Reset" for...
The problem is that the following (much condensed) code does what it's supposed to in Win98SE but not in XP.
The intent is to change the default printer to one specified in a setup table; change to a specific font that is an internal font for the printer (specifically font '15 cpi'); and print...
I'm using the following chunk of code to pop up the calculator in Win 98
Public Sub ShowCalculator()
Dim StringLen As Long
Dim strWinPath As String
Dim strSysFileName As String
Static ProgID As Long
Dim WindowHandle As Long...
Although I've managed my way around the problem with some code, I am curious about what the problem is with the following.
I'm attempting to INSERT INTO a table with the following SQL
INSERT INTO CompletedOrders ( Code, Description, Quantity, Customer, Phone )
SELECT...
I see references in many of the forums to "bespoke" work or "bespoke" applications. I assume that these come from our UK bretheren (of all possible genders, of course). My on-line dictionary (Merriam-Webster) says "to hire, engage, or claim beforehand". ... but what exactly does this mean in...
I've recently upgraded from Access '97 to Access 2003 (i.e. Access XP) ... brave new world, stay ahead of the curve, etc.
In the '97 version of things, using HELP was fairly straight-forward ... type in a word or words and it gave you a list of several possible sections of the documentation...
I need assistance in recovering from my own incompetence.
I have a VB application that displays and Edits icons (*.ico). It works fine but ...
I opened an icon file with it by double clicking on the file in Windows Explorer. It came up with the standard "select an application to open this...
I have two tables as follows.
TABLE CANBE
NAME Seq Canbe
ACCEPT_RET 1 STOCK
ACCEPT_RET 2 SUBDETAIL
ACCEPT_RET 3 SUBDEPT
ACCEPT_RET 4 DEPT
ACCEPT_RET 5 COMPANY
... etc.
TABLE SET
NAME LEVEL VALUE SET
ACCEPT_RET DEPT 34 No
ACCEPT_RET DEPT 37 No
ACCEPT_RET DEPT 99 No
ACCEPT_RET SUBDEPT 77...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.