|
|
 |
WindowsVersion - The version number of the operating system
|
| Total Hit (1921) |
Just copy and paste the following code into Form code window
«code LangId=1»Private Type OSVERSIONINFO
dwOSVersionInfoSize As Long
dwMajorVersion As Long
dwMinorVersion As Long
dwBuildNumber As Long
dwPlatformId As Long
szCSDVersion As String * 128
End Type
Priva
....Read More |
Rating
 |
|
|
|
|
|
|
|
|
|
|
|
|
|
DirExists - Check that a directory exists
|
| Total Hit (3202) |
«Code LangId=1»
' Return True if a directory exists
' (the directory name can also include a trailing backslash)
Function DirExists(DirName As String) As Boolean
On Error GoTo ErrorHandler
' test the directory attribute
DirExists = GetAttr(DirName) And vbDirectory
ErrorHandler:
....Read More |
Rating
 |
|
|
|
GetAllFiles - Search files in a directory or directory tree
|
| Total Hit (4646) |
«code LangId=1»Private Sub Command1_Click()
Dim col As Collection
'//Get all files from C:\ (No sub folder) which are older than 5 days and newer than 30 days
Set col = GetAllFiles("c:\", "*.*", False, 30, 5)
For Each f In col
Debug.Print FileDateTime(f) & "=>" & f
....Read More |
Rating
 |
|
|
|
|
|
|
|
|
|
The best setting for the RunAs option in a server package
|
| Total Hit (1723) |
When you deploy COM objects in DLLs no security issues arise since DLLs run in the process of the caller. On the contrary, when you deploy your COM objects into an .EXE, you have to deal with such issues.
- (D)COM needs to know under what security principal (read identity) the process, where you
....Read More |
| Rating
|
|
|
|
Determine the number of mouse buttons
|
| Total Hit (3118) |
Sometimes is useful to know how many buttons the user's mouse has. This value can be obtained by calling GetSystemMetrics. The constant to pass as parameter is SM_ CMOUSEBUTTONS. Here's an example:
«Code LangId=1»
Const SM_CMOUSEBUTTONS = 43
Private Declare Function GetSystemMetrics Lib "user3
....Read More |
| Rating
|
|
|
|
A dual use of a lookup query
|
| Total Hit (2380) |
Usually in your application you use two different types of lookup query; the first one is for retrieving a page of records (or all records) to populate a pick list, the other one is to retrieve a single record, i.e. for decoding a code description while user is typing it in a textbox. So, if your qu
....Read More |
| Rating
|
|
|
|
Using CallByName with nested objects
|
| Total Hit (3118) |
Sometimes Microsoft documentation can be, well lacking is a kind word, and one is reluctant to call tech support when they smoke your credit card first, and ask questions later.
My problem was that the CallByName procedure was refusing to call nested lasses. To see what I mean, consider that if y
....Read More |
| Rating
|
|
|
|
Limit the length of the text in a TreeView node
|
| Total Hit (4307) |
The TreeView control doesn't expose any property that lets you limit the amount of text users can type when editing a Node's label. However, you can do the trick with a couple of SendMessage API calls from within the BeforeLabelEdit event: with the TVM_GETEDITCONTROL message you retrieve the handle
....Read More |
| Rating
|
|
|
|
Get the handle of the edit portion of a ComboBox
|
| Total Hit (2949) |
The ComboBox control contains an invisible Edit window, which is used for the edit area. In most cases you don't need to access this inner control directly, but occasionally a direct control of that window can be useful. The first thing to do is get the handle of such inner Edit control, which you d
....Read More |
| Rating
|
|
|
|
Make a Checkbox control read-only
|
| Total Hit (2951) |
By default, VB's CheckBox controls automatically toggle their Value property when the user clicks on them. This is usually the desired behavior, but at times you may want to be able to change their value only programmatically. Unfortunately, you can't achieve this result by simply setting the CheckB
....Read More |
| Rating
|
|
|
|
Undocumented trick to speed up functions that return array
|
| Total Hit (2606) |
VB6 functions can return an array. Unlike regular functions that return scalar values or objects, however, you can't use the name of the function as a local variable where to store intermediate result, and you are forced to work with a temporary local array, and then assign this array to the Functio
....Read More |
| Rating
|
|
|
|
Simplify and optimize expressions with And, Or and Xor operators
|
| Total Hit (3189) |
Let's assume you must test whether the most significan bit of an integer value is set or not. This is the code that you usually write:
' two cases, depending on whether the value is Integer or Long
If intValue And &H8000 Then
' most significant bit is set
End If
If lngValue And &H8000000
....Read More |
| Rating
|
|
|
|
|
|
|
|
XPath Visualizer:A visual tool to test your XPath Statements
|
| Total Hit (1464) |
XPath Visualiser is a tool that enables you to test your XPath queries.
This is a full blown Visual XPath Interpreter for the evaluation of any XPath expression and visual presentation of the resulting nodeset or scalar value.
«b»Screenshots:«/b»
«a href="http://www.vbxml.com/xpathvisualizer
....Read More |
| Rating
|
|
|
|
HOWTO: Use the Chart Web Component with Visual Basic
|
| Total Hit (2453) |
This article shows the different ways that you can access the documentation for Microsoft Office Web Components (OWC). The article also includes information about additional resources for programming the OWC.
|
| Rating
|
|
|
|
Obtaining Logical Disk Information using WMI
|
| Total Hit (1224) |
Windows Script Host is built into Microsoft Windows 98, 2000, ME and XP. If you are running Windows 95 or NT4, you can download Windows Script Host from the Microsoft Windows Script Technologies Web site at http://msdn.microsoft.com/scripting/. Some information is not returned on non-NT-based system
....Read More |
| Rating
|
|
|
|
Detecting ListView SubItem Clicks in Normal And FullRowSelect Mode
|
| Total Hit (1040) |
This page demonstrates using the LVHITTESTINFO type along with the LVM_SUBITEMHITTEST message to determine where on the control the mouse was clicked, regardless of the view mode or whether the FullRowSelect feature has been enabled (Label1). The code is provided in the MouseDown event to both take
....Read More |
| Rating
|
|
|
|
Thumbnail Extraction Using the Shell
|
| Total Hit (2140) |
Since Windows Me/2000, the Windows Shell has included a mechanism for extracting a small thumbnail image for any item in the namespace. This sample demonstrates how to use this function to get thumbnail images for web pages, images, Office documents - in fact anything that supports thumbnailing in E
....Read More |
| Rating
|
|
|
|
vbAccelerator Accelerator Control
|
| Total Hit (785) |
If you've ever tried to pick a keyboard accelerator for the menu items Back and Next in your application, you might have discovered a limitation in VB's ability to set up accelerators. IE offers some sensibly chosen keyboard accelerators for its Back, Next, Home shortcuts, using Alt and the arrow an
....Read More |
| Rating
|
|
|
|
Icons without forms and document association icons in VB
|
| Total Hit (1885) |
VB allows you to choose an icon for an executable, but it offers a somewhat limited choice. The icon must be stored in a form included in your VB project, and you can only pick one icon to be exposed publicly per project. Whilst the single icon is the most important one, you might want to have addit
....Read More |
| Rating
|
|