Knowledge Base

BUG: DBCombo Issues Click Event While Scrolling

Article ID: 142835

Article Last Modified on 12/9/2003

Microsoft Visual Basic 4.0 Professional Edition
Microsoft Visual Basic 4.0 Professional Edition
Microsoft Visual Basic 4.0 16-bit Enterprise Edition
Microsoft Visual Basic 4.0 32-Bit Enterprise Edition

This article was previously published under Q142835

SUMMARY

While using the mouse to scroll through items in the list of a DBCombo control the DBCombo's Click event is fired for every row scrolled.

WORKAROUND

Do not rely upon the Click event of the DBCombo control to indicate when an item has been selected. One possible workaround to detect when a user has made a change would be to store the contents of the Text property of the DBCombo in the DBCombo's GotFocus event, and then check to see whether this had changed in the LostFocus event of the same control.

STATUS

Microsoft has confirmed this to be a issue in the Microsoft products listed at the beginning of this article. Microsoft is researching this problem and will post new information here in the Microsoft Knowledge Base as it becomes available.

MORE INFORMATION

Steps to Reproduce the Problem

Start Visual Basic, or if Visual Basic is already running, start a new project.
Add a data control to Form1.

Change these properties of the data control:

   DatabaseName:   BIBLIO.MDB
   RecordSource:   Authors

Add a DBCombo control to the form.

Change these properties of the DBCombo control:

   RowSource:   Data1
   ListField:   AU_ID

Add the following code to the Click event of DBCombo1:

   Private Sub DBCombo1_Click(Area As Integer)
       Debug.Print "CLICK"
   End Sub

Press F5 to run the application. Use the mouse to drop the combo box. Select a visible number and keep the mouse button depressed. Now drag downwards to force the list to scroll. Notice the generated "CLICK" statements in the debug window.

Additional query words: 4.00 vb4win vb4all

Keywords: kbbug KB142835