
- •Using Your Sybex Electronic Book
- •Acknowledgments
- •Contents at a Glance
- •Introduction
- •Who Should Read This Book?
- •How About the Advanced Topics?
- •The Structure of the Book
- •How to Reach the Author
- •The Integrated Development Environment
- •The Start Page
- •Project Types
- •Your First VB Application
- •Making the Application More Robust
- •Making the Application More User-Friendly
- •The IDE Components
- •The IDE Menu
- •The Toolbox Window
- •The Solution Explorer
- •The Properties Window
- •The Output Window
- •The Command Window
- •The Task List Window
- •Environment Options
- •A Few Common Properties
- •A Few Common Events
- •A Few Common Methods
- •Building a Console Application
- •Summary
- •Building a Loan Calculator
- •How the Loan Application Works
- •Designing the User Interface
- •Programming the Loan Application
- •Validating the Data
- •Building a Math Calculator
- •Designing the User Interface
- •Programming the MathCalculator App
- •Adding More Features
- •Exception Handling
- •Taking the LoanCalculator to the Web
- •Working with Multiple Forms
- •Working with Multiple Projects
- •Executable Files
- •Distributing an Application
- •VB.NET at Work: Creating a Windows Installer
- •Finishing the Windows Installer
- •Running the Windows Installer
- •Verifying the Installation
- •Summary
- •Variables
- •Declaring Variables
- •Types of Variables
- •Converting Variable Types
- •User-Defined Data Types
- •Examining Variable Types
- •Why Declare Variables?
- •A Variable’s Scope
- •The Lifetime of a Variable
- •Constants
- •Arrays
- •Declaring Arrays
- •Initializing Arrays
- •Array Limits
- •Multidimensional Arrays
- •Dynamic Arrays
- •Arrays of Arrays
- •Variables as Objects
- •So, What’s an Object?
- •Formatting Numbers
- •Formatting Dates
- •Flow-Control Statements
- •Test Structures
- •Loop Structures
- •Nested Control Structures
- •The Exit Statement
- •Summary
- •Modular Coding
- •Subroutines
- •Functions
- •Arguments
- •Argument-Passing Mechanisms
- •Event-Handler Arguments
- •Passing an Unknown Number of Arguments
- •Named Arguments
- •More Types of Function Return Values
- •Overloading Functions
- •Summary
- •The Appearance of Forms
- •Properties of the Form Control
- •Placing Controls on Forms
- •Setting the TabOrder
- •VB.NET at Work: The Contacts Project
- •Anchoring and Docking
- •Loading and Showing Forms
- •The Startup Form
- •Controlling One Form from within Another
- •Forms vs. Dialog Boxes
- •VB.NET at Work: The MultipleForms Project
- •Designing Menus
- •The Menu Editor
- •Manipulating Menus at Runtime
- •Building Dynamic Forms at Runtime
- •The Form.Controls Collection
- •VB.NET at Work: The DynamicForm Project
- •Creating Event Handlers at Runtime
- •Summary
- •The TextBox Control
- •Basic Properties
- •Text-Manipulation Properties
- •Text-Selection Properties
- •Text-Selection Methods
- •Undoing Edits
- •VB.NET at Work: The TextPad Project
- •Capturing Keystrokes
- •The ListBox, CheckedListBox, and ComboBox Controls
- •Basic Properties
- •The Items Collection
- •VB.NET at Work: The ListDemo Project
- •Searching
- •The ComboBox Control
- •The ScrollBar and TrackBar Controls
- •The ScrollBar Control
- •The TrackBar Control
- •Summary
- •The Common Dialog Controls
- •Using the Common Dialog Controls
- •The Color Dialog Box
- •The Font Dialog Box
- •The Open and Save As Dialog Boxes
- •The Print Dialog Box
- •The RichTextBox Control
- •The RTF Language
- •Methods
- •Advanced Editing Features
- •Cutting and Pasting
- •Searching in a RichTextBox Control
- •Formatting URLs
- •VB.NET at Work: The RTFPad Project
- •Summary
- •What Is a Class?
- •Building the Minimal Class
- •Adding Code to the Minimal Class
- •Property Procedures
- •Customizing Default Members
- •Custom Enumerations
- •Using the SimpleClass in Other Projects
- •Firing Events
- •Shared Properties
- •Parsing a Filename String
- •Reusing the StringTools Class
- •Encapsulation and Abstraction
- •Inheritance
- •Inheriting Existing Classes
- •Polymorphism
- •The Shape Class
- •Object Constructors and Destructors
- •Instance and Shared Methods
- •Who Can Inherit What?
- •Parent Class Keywords
- •Derived Class Keyword
- •Parent Class Member Keywords
- •Derived Class Member Keyword
- •MyBase and MyClass
- •Summary
- •On Designing Windows Controls
- •Enhancing Existing Controls
- •Building the FocusedTextBox Control
- •Building Compound Controls
- •VB.NET at Work: The ColorEdit Control
- •VB.NET at Work: The Label3D Control
- •Raising Events
- •Using the Custom Control in Other Projects
- •VB.NET at Work: The Alarm Control
- •Designing Irregularly Shaped Controls
- •Designing Owner-Drawn Menus
- •Designing Owner-Drawn ListBox Controls
- •Using ActiveX Controls
- •Summary
- •Programming Word
- •Objects That Represent Text
- •The Documents Collection and the Document Object
- •Spell-Checking Documents
- •Programming Excel
- •The Worksheets Collection and the Worksheet Object
- •The Range Object
- •Using Excel as a Math Parser
- •Programming Outlook
- •Retrieving Information
- •Recursive Scanning of the Contacts Folder
- •Summary
- •Advanced Array Topics
- •Sorting Arrays
- •Searching Arrays
- •Other Array Operations
- •Array Limitations
- •The ArrayList Collection
- •Creating an ArrayList
- •Adding and Removing Items
- •The HashTable Collection
- •VB.NET at Work: The WordFrequencies Project
- •The SortedList Class
- •The IEnumerator and IComparer Interfaces
- •Enumerating Collections
- •Custom Sorting
- •Custom Sorting of a SortedList
- •The Serialization Class
- •Serializing Individual Objects
- •Serializing a Collection
- •Deserializing Objects
- •Summary
- •Handling Strings and Characters
- •The Char Class
- •The String Class
- •The StringBuilder Class
- •VB.NET at Work: The StringReversal Project
- •VB.NET at Work: The CountWords Project
- •Handling Dates
- •The DateTime Class
- •The TimeSpan Class
- •VB.NET at Work: Timing Operations
- •Summary
- •Accessing Folders and Files
- •The Directory Class
- •The File Class
- •The DirectoryInfo Class
- •The FileInfo Class
- •The Path Class
- •VB.NET at Work: The CustomExplorer Project
- •Accessing Files
- •The FileStream Object
- •The StreamWriter Object
- •The StreamReader Object
- •Sending Data to a File
- •The BinaryWriter Object
- •The BinaryReader Object
- •VB.NET at Work: The RecordSave Project
- •The FileSystemWatcher Component
- •Properties
- •Events
- •VB.NET at Work: The FileSystemWatcher Project
- •Summary
- •Displaying Images
- •The Image Object
- •Exchanging Images through the Clipboard
- •Drawing with GDI+
- •The Basic Drawing Objects
- •Drawing Shapes
- •Drawing Methods
- •Gradients
- •Coordinate Transformations
- •Specifying Transformations
- •VB.NET at Work: Plotting Functions
- •Bitmaps
- •Specifying Colors
- •Defining Colors
- •Processing Bitmaps
- •Summary
- •The Printing Objects
- •PrintDocument
- •PrintDialog
- •PageSetupDialog
- •PrintPreviewDialog
- •PrintPreviewControl
- •Printer and Page Properties
- •Page Geometry
- •Printing Examples
- •Printing Tabular Data
- •Printing Plain Text
- •Printing Bitmaps
- •Using the PrintPreviewControl
- •Summary
- •Examining the Advanced Controls
- •How Tree Structures Work
- •The ImageList Control
- •The TreeView Control
- •Adding New Items at Design Time
- •Adding New Items at Runtime
- •Assigning Images to Nodes
- •Scanning the TreeView Control
- •The ListView Control
- •The Columns Collection
- •The ListItem Object
- •The Items Collection
- •The SubItems Collection
- •Summary
- •Types of Errors
- •Design-Time Errors
- •Runtime Errors
- •Logic Errors
- •Exceptions and Structured Exception Handling
- •Studying an Exception
- •Getting a Handle on this Exception
- •Finally (!)
- •Customizing Exception Handling
- •Throwing Your Own Exceptions
- •Debugging
- •Breakpoints
- •Stepping Through
- •The Local and Watch Windows
- •Summary
- •Basic Concepts
- •Recursion in Real Life
- •A Simple Example
- •Recursion by Mistake
- •Scanning Folders Recursively
- •Describing a Recursive Procedure
- •Translating the Description to Code
- •The Stack Mechanism
- •Stack Defined
- •Recursive Programming and the Stack
- •Passing Arguments through the Stack
- •Special Issues in Recursive Programming
- •Knowing When to Use Recursive Programming
- •Summary
- •MDI Applications: The Basics
- •Building an MDI Application
- •Built-In Capabilities of MDI Applications
- •Accessing Child Forms
- •Ending an MDI Application
- •A Scrollable PictureBox
- •Summary
- •What Is a Database?
- •Relational Databases
- •Exploring the Northwind Database
- •Exploring the Pubs Database
- •Understanding Relations
- •The Server Explorer
- •Working with Tables
- •Relationships, Indices, and Constraints
- •Structured Query Language
- •Executing SQL Statements
- •Selection Queries
- •Calculated Fields
- •SQL Joins
- •Action Queries
- •The Query Builder
- •The Query Builder Interface
- •SQL at Work: Calculating Sums
- •SQL at Work: Counting Rows
- •Limiting the Selection
- •Parameterized Queries
- •Calculated Columns
- •Specifying Left, Right, and Inner Joins
- •Stored Procedures
- •Summary
- •How About XML?
- •Creating a DataSet
- •The DataGrid Control
- •Data Binding
- •VB.NET at Work: The ViewEditCustomers Project
- •Binding Complex Controls
- •Programming the DataAdapter Object
- •The Command Objects
- •The Command and DataReader Objects
- •VB.NET at Work: The DataReader Project
- •VB.NET at Work: The StoredProcedure Project
- •Summary
- •The Structure of a DataSet
- •Navigating the Tables of a DataSet
- •Updating DataSets
- •The DataForm Wizard
- •Handling Identity Fields
- •Transactions
- •Performing Update Operations
- •Updating Tables Manually
- •Building and Using Custom DataSets
- •Summary
- •An HTML Primer
- •HTML Code Elements
- •Server-Client Interaction
- •The Structure of HTML Documents
- •URLs and Hyperlinks
- •The Basic HTML Tags
- •Inserting Graphics
- •Tables
- •Forms and Controls
- •Processing Requests on the Server
- •Building a Web Application
- •Interacting with a Web Application
- •Maintaining State
- •The Web Controls
- •The ASP.NET Objects
- •The Page Object
- •The Response Object
- •The Request Object
- •The Server Object
- •Using Cookies
- •Handling Multiple Forms in Web Applications
- •Summary
- •The Data-Bound Web Controls
- •Simple Data Binding
- •Binding to DataSets
- •Is It a Grid, or a Table?
- •Getting Orders on the Web
- •The Forms of the ProductSearch Application
- •Paging Large DataSets
- •Customizing the Appearance of the DataGrid Control
- •Programming the Select Button
- •Summary
- •How to Serve the Web
- •Building a Web Service
- •Consuming the Web Service
- •Maintaining State in Web Services
- •A Data-Driven Web Service
- •Consuming the Products Web Service in VB
- •Summary

BUILDING OWNER-DRAWN CONTROLS 425
background of each item, draw the text in any colors, and create items of varying heights. This is a very interesting technique, because without it, as you recall from our discussion of the ListBox control, all items have the same height and you must make each control wide enough to fit the longest item (if this is known at design time).
To create an owner-drawn control, you must program two events: the MeasureItem and DrawItem events. As you may have noticed, you can only interfere with the drawing process of controls that display items in rectangles (like the MenuItem and ListBox controls). The MeasureItem event is where you decide about the dimensions of the rectangle where the drawing will take place.
These two events don’t take place unless you set the DrawMode property of the control. Since only controls that expose the DrawMode property can be owner-drawn, you have a quick way of figuring out whether a control’s appearance can be customized with the techniques discussed in this section. This property can be set to Normal (the control is draws its own surface), OwnerDrawnFixed (you can draw the control, but the height of the drawing area remains fixed), or OwnerDrawnVariable (you can draw the control and use a different height for each item). The settings of the DrawMode shown here apply to the ListBox control. The MenuItem control provides the OwnerDraw mode, whose settings are True (you’re responsible for rendering the item’s rectangle) or False. Let’s start by building an owner-drawn menu.
Designing Owner-Drawn Menus
When a menu item’s OwnerDraw property is set to True, the following events are fired every time the item is about to be drawn: first the MeasureItem event, then the DrawItem event. In the first event, you can find out the properties of the item and set up the size of the rectangle in which the menu item will be rendered. In the second event, you must insert the code to draw the item.
The second argument of both events, the ubiquitous e argument, exposes the Graphics object, which represents the area on which the item will be drawn. In the MeasureItem event’s handler, you can’t draw anything. You can calculate the dimensions of the rectangle that delimits the drawing you want to create and set the e argument’s ItemWidth and ItemHeight properties respectively.
In the DrawItem event’s handler, you can call any of the Graphic object’s drawing commands to render anything on the item’s rectangle. You can draw text in any font, style, or size, draw simple shapes, or even place a small bitmap in the item’s rectangle. To demonstrate the design of ownerdrawn menus, I’ve included the OwnerDrawnMenu project on the CD, which creates a simple menu with font names. Each name is rendered in the corresponding font, so that you can see what the text will look like when rendered in this font. The form of the OwnerDrawnMenu project is shown in Figure 9.10.
Figure 9.10
A simple ownerdrawn menu
Copyright ©2002 SYBEX, Inc., Alameda, CA |
www.sybex.com |

426 Chapter 9 BUILDING CUSTOM WINDOWS CONTROLS
First, you must design the menu as usual and set the OwnerDrawn property of each menu item to True. Give meaningful names to all items, so that you can simplify your code.
Then insert the code of the Listing 9.20 in the MeasureItem and DrawItem event handlers of each owner-drawn menu item.
Listing 9.20: Programming the MeasureItem and DrawItem Events
Private Sub FontVerdana_MeasureItem(ByVal sender As Object, _
ByVal e As System.Windows.Forms.MeasureItemEventArgs) _ Handles FontVerdana.MeasureItem
Dim fnt As New Font(“Verdana”, 12, FontStyle.Regular) Dim itemSize As SizeF
itemSize = e.Graphics.MeasureString(“Verdana”, fnt) e.ItemHeight = itemSize.Height
e.ItemWidth = itemSize.Width End Sub
Private Sub FontVerdana_DrawItem(ByVal sender As Object, _
ByVal e As System.Windows.Forms.DrawItemEventArgs) _ Handles FontVerdana.DrawItem
Dim fnt As New Font(“Verdana”, 12, FontStyle.Regular) Dim R As New RectangleF(e.Bounds.X, e.Bounds.Y, _
e.Bounds.Width, e.Bounds.Height)
Dim brush As SolidBrush e.Graphics.FillRectangle(Brushes.PaleTurquoise, R) e.Graphics.DrawString(“Verdana”, fnt, Brushes.White, R)
End Sub
I’m only showing the code for the first menu item; the others are identical. In the MeasureItem event handler, the code calls the MeasureString method to find out the dimensions of the item’s caption when rendered in its font and then sets the dimensions of the item’s rectangle in the menu. The code in the DrawItem event handler draws the caption in the item’s rectangle. It uses a white solid brush and sets the item’s background color to red. The string is rendered in white color. The last item (the handwriting font) is rendered in blue color on a yellow background.
The code is quite trivial really, and all the drawing methods will be discussed in detail in Chapter 14. You can return to this project after reading about the drawing methods and create more elaborate owner-drawn menus.
Designing Owner-Drawn ListBox Controls
In this section, we’ll look at a similar technique for designing owner-drawn ListBox controls. You may have to create owner-drawn ListBoxes if you want to use different colors or fonts for different items, or to populate the list with items of widely different lengths. The example you’ll build in this section, shown in Figure 9.11, uses an alternating background color, and each item has a different height, depending on the string it holds. Lengthy strings are broken into multiple lines at word boundaries. Since you’re responsible for breaking the string into lines, you can use any other
Copyright ©2002 SYBEX, Inc., Alameda, CA |
www.sybex.com |

BUILDING OWNER-DRAWN CONTROLS 427
technique—for example, you can place an ellipsis to indicate that the string is too long to fit on the control, or use a smaller font, and so on.
Figure 9.11
An unusual, but quite functional ListBox control
The fancy ListBox of Figure 9.11 was created with the OwnerDrawnList project, which you will find on the CD. Or you can follow the steps outlined in this section to build it from scratch.
To custom-draw the items on a ListBox control (or a ComboBox, for that matter), you use the MeasureItem event to calculate the item’s dimensions and the DrawItem event to actually draw the item. Each item is a rectangle that exposes a Graphics object, and you can call any of the Graphics object’s drawing methods to draw on the item’s area. The drawing techniques we’ll use in this example are similar to the ones we used in the previous section, but once you learn more about the drawing methods in Chapter 14, you’ll be able to create even more elaborate designs than the ones shown here.
The items to be added to the list are stored in an ArrayList, which is populated in the form’s Load event handler. Each time you add a new item to the ListBox control, it’s first added to the ArrayList, then to the control. The reason for doing this is because at the time the MeasureItem event is fired, the item isn’t part of the list yet and there’s no simple method to access the new item—short of using a global variable. It’s a minor inconvenience, and if you experiment with the OwnerDrawnList project, you may be able to find a work-around.
Each time an item is about to be drawn, the MeasureString and DrawString events are fired, in this order. In the MeasureString event handler, we set the dimensions of the item with the statements shown in Listing 9.21.
Listing 9.21: Setting Up an Item’s Rectangle in an Owner-Drawn ListBox Control
Private Sub ListBox1_MeasureItem(ByVal sender As Object, _
ByVal e As System.Windows.Forms.MeasureItemEventArgs) _ Handles ListBox1.MeasureItem
Dim itmSize As SizeF
Dim S As New SizeF(ListBox1.Width, 200)
itmSize = e.Graphics.MeasureString(items(e.Index).ToString, fnt, S) e.ItemHeight = itmSize.Height
e.ItemWidth = itmSize.Width End Sub
Copyright ©2002 SYBEX, Inc., Alameda, CA |
www.sybex.com |

428 Chapter 9 BUILDING CUSTOM WINDOWS CONTROLS
This time we’re using a different form of the MeasureString method. This form accepts as arguments a string, the font in which the string will be rendered, and a SizeF object. The SizeF object contains two members, the Width and Height members. These two members are used to pass to the method information about the area in which we want to print the string. In our example, we’re going to print the string in a rectangle that’s as wide as the ListBox control and as tall as needed to fit the entire string. I’m using a height of 200 pixels (enough the fit the longest string users may throw at the control). Upon return, the MeasureString method sets the members of the SizeF object to the width and height actually required to print the string. What we get back is the height of a rectangle in which the string will fit.
The two members of the SizeF object are then used to set the dimensions of the current item (properties e.ItemWidth and e.ItemHeight). We’ve set the dimensions of the item, and we’re ready to draw it. The custom rendering of the current item takes place in the ItemDraw event handler, which is shown in Listing 9.22.
Listing 9.22: Drawing an Item in an Owner-Drawn ListBox Control
Private Sub ListBox1_DrawItem(ByVal sender As Object, _
ByVal e As System.Windows.Forms.DrawItemEventArgs) _ Handles ListBox1.DrawItem
If e.Index = -1 Then Exit Sub Dim txtBrush As SolidBrush Dim bgBrush As SolidBrush Dim txtfnt As Font
If e.Index / 2 = CInt(e.Index / 2) Then ‘ color even numbered items
txtBrush = New SolidBrush(Color.Blue) bgBrush = New SolidBrush(Color.LightYellow)
Else
‘ color odd numbered items
txtBrush = New SolidBrush(Color.Blue) bgBrush = New SolidBrush(Color.Cyan)
End If
If e.State And DrawItemState.Selected Then
‘use red color and bold for the selected item txtBrush = New SolidBrush(Color.Red)
txtfnt = New Font(fnt.Name, fnt.Size, FontStyle.Bold)
Else
txtfnt = fnt End If
e.Graphics.FillRectangle(bgBrush, e.Bounds) e.Graphics.DrawRectangle(Pens.Black, e.Bounds) Dim R As New RectangleF(e.Bounds.X, e.Bounds.Y, _
e.Bounds.Width, e.Bounds.Height) e.Graphics.DrawString(items(e.Index).ToString, txtfnt, txtBrush, R) e.DrawFocusRectangle()
End Sub
Copyright ©2002 SYBEX, Inc., Alameda, CA |
www.sybex.com |