MS Access VBA Control Events – PT1

In this video we are going to cover the following MS Access VBA Control Events:
Click
DblClick
GotFocus
LostFocus
DblClick
Change

This is part 1 of a 3 part video series.

Private Sub btnClick_Click()
    MsgBox &quot;Click&quot;
    
End Sub

Private Sub imgDoubleClick_DblClick(Cancel As Integer)
    
    'These events fire before the DblClick event
    
    'MouseDown
    'MouseUp
    'Click
    'DblClick
    
    Me.txtDoubleClick.Visible = True
    
End Sub

Private Sub txtDoubleClick_GotFocus()
    MsgBox &quot;Enter Password Now&quot;
End Sub


Private Sub txtDoubleClick_LostFocus()
    MsgBox &quot;You have left this textbox.  Continue?&quot;
    
End Sub

Private Sub lblBookReport_DblClick(Cancel As Integer)
    'Open the Book Report
    DoCmd.OpenReport &quot;Books&quot;, acViewPreview
    
End Sub



Private Sub txtChange_Change()
    Me.lblChange.Caption = Me.txtChange.Text
End Sub