FIX: ListView ItemClick Event Executes Multiple Times

MORE INFORMATION

Step-by-Step Example

1. Start a new Standard EXE project in Visual Basic. Form1 is created by default.
2. Add a reference to the Microsoft Common Controls 5.0 by completing the following steps:
   
   
   1. From the Project menu, click Components to display the Components dialog box.
   2. Check Microsoft Common Controls 5.0 and click OK.
3. Add a ListView control to Form1:

         Option Explicit
   
         Public bToggle As Boolean     'Boolean Flag
   
         Private Sub Form_Load()
         'Adds items to the ListView control
             ListView1.View = lvwList
             ListView1.ListItems.Add , , "Test1"
             ListView1.ListItems.Add , , "Test2"
             ListView1.ListItems.Add , , "Test3"
             ListView1.ListItems.Add , , "Test4"
             ListView1.ListItems.Add , , "Test5"
             ListView1.ListItems.Add , , "Test6"
             ListView1.ListItems.Add , , "Test7"
         End Sub
   
         Private Sub ListView1_ItemClick(ByVal Item As ComctlLib.ListItem)
         'This event only occurs if the Boolean flag is True.
            If bToggle = True Then
               'Comment all lines in this event except for the following
               'line to reproduce the bug.
               MsgBox ListView1.SelectedItem.Text
            End If
            bToggle = False
         End Sub
   
         Private Sub ListView1_MouseDown(Button As Integer, _
                                       Shift As Integer, _
                                       x As Single, _
                                       y As Single)
           'Set the Boolean flag to True. Comment the following line
           'to reproduce the bug.
            bToggle = True
         End Sub
   
   						

4. If you want to reproduce the behavior, comment the appropriate lines. Otherwise, on the Run menu, click Start or press the F5 key to start the program. Click on an item in the ListView control to display a message box. Click OK to close the message box. If the appropriate lines were commented, the message box displays a second time. The correct behavior is the message box displays only once.