• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Creates 'DblClick' event for a 'CommandButton' control

Creates 'DblClick' event for a 'CommandButton' control

Creates 'DblClick' event for a 'CommandButton' control

Rate Creates 'DblClick' event for a 'CommandButton' control

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

' called "DoubleClickTimer" with interval property set at 500 and disabled.
' Drop a "commandButton" called "cmdSave" and labelled "Save" on the form.
' Add the following code in the click event of the "CommandButton" and that of 
' the DoubleClickTimer

Private Sub cmdSave_Click()
 DoubleClick = DoubleClick + 1
 If DoubleClick < 2 Then
    DoubleClickTimer.Enabled = True
    Exit Sub
 End If
 DoubleClick = 0
 DoubleClickTimer.Enabled = False

' Enter Statements You want to execute when You double click on the 
' CommandButton 
' Note that U can use the invterval property of the Timer to control the rate 
' of double clicking

End Sub
_______________________________________________________________________________

Private Sub DoubleClickTimer_Timer()
  DoubleClick = 0
End Sub