BUG: DBCombo Issues Click Event While Scrolling

• Professional and Enterprise Editions of Microsoft Visual Basic, 16-bit and 32-bit, for Windows, version 4.0

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

1. Start Visual Basic, or if Visual Basic is already running, start a new project.

2. Add a data control to Form1.

3. Change these properties of the data control:

      DatabaseName:   BIBLIO.MDB
      RecordSource:   Authors
   
   

4. Add a DBCombo control to the form.

5. Change these properties of the DBCombo control:

      RowSource:   Data1
      ListField:   AU_ID
   
   

6. Add the following code to the Click event of DBCombo1:

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

7. 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.