VB Gauge Custom Control: No Err for Illegal NeedleWidth Values

ID Number: Q80905

1.00

WINDOWS

buglist1.00

Summary:

When you use the Gauge custom control from Microsoft Professional

Toolkit for Visual Basic 1.0, setting the NeedleWidth property to an

invalid value fails to generate an error. Furthermore, attempting to

set the NeedleWidth property outside its valid range will reset the

NeedleWidth property to 1. This behavior occurs at both design time

and run time.

Microsoft has confirmed this to be a problem with the Gauge custom

control supplied with Microsoft Professional Toolkit for Microsoft

Visual Basic programming system version 1.0 for Windows. We are

researching this problem and will post new information here as it

becomes available.

More Information:

Steps to Reproduce Problem

--------------------------

1. Start Visual Basic, or from the File menu, choose New Project (ALT,

F, N) if Visual Basic is already running.

2. From the File menu, choose Add File (CTRL+F12), and select

GAUGE.VBX to add the Gauge control to the Toolbox. The Gauge tool

will appear in the Toolbox.

3. Add the Gauge control to Form1 and set the gauge's Style property

to 2 - 'Semi' Needle or 3 - 'Full' Needle.

4. Add the following code to the Form_Click event procedure.

Sub Form_Click ()

Gauge1.NeedleWidth = -3

MsgBox "NeedleWidth = " + Str$(Gauge1.NeedleWidth)

End Sub

5. From the Run menu, choose Start (ALT, R, S) to run the program.

Notice that clicking the form will produce a message box that displays

the value of the gauge's NeedleWidth property. Even though the

NeedleWidth is explicitly set to -3 before the message box is

displayed, the NeedleWidth property will reset to a value of 1.

Additional reference words: 1.00