Latest revision as of 11:05, 21 July 2020

Knowledge Base

FIX: MouseUp Event Not Triggered in DblClick w/Comctl32

Article ID: 171494

Article Last Modified on 11/18/2003

APPLIES TO

Microsoft Visual Basic 5.0 Learning Edition
Microsoft Visual Basic 5.0 Professional Edition
Microsoft Visual Basic 5.0 Enterprise Edition

This article was previously published under Q171494

SYMPTOMS

When you double-click one of the Windows Common Controls, the second MouseUp event is not triggered. The Windows Common Controls affected are the ToolBar (with AllowCustomize set to True or False), StatusBar, ListView, and TreeView.

STATUS

Microsoft has confirmed this to be a bug in the Microsoft products listed at the beginning of this article. This bug has been fixed in Visual Studio 97 Service Pack 2.

For more information on the Visual Studio 97 Service Pack 2, please see the following article in the Microsoft Knowledge Base:

170365 INFO: Visual Studio 97 Service Packs - What, Where, and Why

For a list of the Visual Basic 5.0 bugs that were fixed in the Visual Studio 97 Service Pack 2, please see the following article in the Microsoft Knowledge Base:

171554 INFO: Visual Basic 5.0 Fixes in Visual Studio 97 Service Pack 2

MORE INFORMATION

Steps to Reproduce Behavior

Create a new "Standard EXE" project.
Click References on the Project menu. Select "Microsoft Windows Common Controls 5.0," and click OK.
Place a ListView control on the default form.

Paste the following code in the form.

      Private Sub ListView1_MouseDown(Button As Integer, _
         Shift As Integer, x As Single, y As Single)
         Debug.Print "MouseDown"
      End Sub

      Private Sub ListView1_MouseUp(Button As Integer, Shift As Integer, _
         x As Single, y As Single)
         Debug.Print "MouseUp"
      End Sub

      Private Sub ListView1_DblClick()
         Debug.Print "DblClick"
      End Sub

Press the F5 key to run the application.
Double-click the ListView control.

When you double-click the ListView control, the Immediate Window will display the following text:

   MouseDown
   MouseUp
   DblClick

If you add code similar to that above to the events of Form1 (rather than the ListView control), the second MouseUp event is triggered as expected. The Immediate Window will display the following text:

   MouseDown
   MouseUp
   DblClick
   MouseUp

Additional query words: comctl32.ocx

Keywords: kbbug kbfix kbvbp500sp2fix kbvs97sp2fix KB171494

@@ Line 78: / Line 78: @@
 <ol>
-<li>Create a new &quot;Standard EXE&quot; project.</li>
+<li>Create a new "Standard EXE" project.</li>
-<li>Click References on the Project menu. Select &quot;Microsoft Windows Common Controls 5.0,&quot; and click OK.</li>
+<li>Click References on the Project menu. Select "Microsoft Windows Common Controls 5.0," and click OK.</li>
 <li>Place a ListView control on the default form.</li>
 <li><p>Paste the following code in the form.</p>
 <pre class="codesample">      Private Sub ListView1_MouseDown(Button As Integer, _
           Shift As Integer, x As Single, y As Single)
-          Debug.Print &quot;MouseDown&quot;
+          Debug.Print "MouseDown"
        End Sub
        Private Sub ListView1_MouseUp(Button As Integer, Shift As Integer, _
           x As Single, y As Single)
-          Debug.Print &quot;MouseUp&quot;
+          Debug.Print "MouseUp"
        End Sub
        Private Sub ListView1_DblClick()
-          Debug.Print &quot;DblClick&quot;
+          Debug.Print "DblClick"
        End Sub
                          </pre></li>

Microsoft KB Archive/171494: Difference between revisions