【Access】コントロールオブジェクトに対応するイベント一覧

概要

Accessフォームで使用可能なコントロール (CommandButton、Labelなど) で、
それぞれがどのイベントに対応しているかをまとめた。

コントロールのイベント一覧

コントロールオブジェクト	オブジェクトタイプ定数	番号	AfterUpdate	AttachmentCurrent	BeforeNavigate2	BeforeUpdate	Change	Click	DblClick	Dirty	DocumentComplete	Enter	Exit	GotFocus	KeyDown	KeyPress	KeyUp	LostFocus	MouseDown	MouseMove	MouseUp	NavigateError	ProgressChange	Updated	NotInList	Undo
Attachment	acAttachment	126	○	○	-	○	○	○	○	○	-	○	○	○	○	○	○	○	○	○	○	-	-	-	-	-
BoundObjectFrame	acBoundObjectFrame	108	○	-	-	○	-	○	○	-	-	○	○	○	○	○	○	○	○	○	○	-	-	○	-	-
CheckBox	acCheckBox	106	○	-	-	○	-	○	○	-	-	○	○	○	○	○	○	○	○	○	○	-	-	-	-	-
ComboBox	acComboBox	111	○	-	-	○	○	○	○	○	-	○	○	○	○	○	○	○	○	○	○	-	-	-	○	○
CommandButton	acCommandButton	104	-	-	-	-	-	○	○	-	-	○	○	○	○	○	○	○	○	○	○	-	-	-	-	-
ActiveX	acCustomControl	119	-	-	-	-	-	-	-	-	-	○	○	○	-	-	-	○	-	-	-	-	-	○	-	-
EmptyCell	acEmptyCell	127	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-
Image	acImage	103	-	-	-	-	-	○	○	-	-	-	-	-	-	-	-	-	○	○	○	-	-	-	-	-
Label	acLabel	100	-	-	-	-	-	○	○	-	-	-	-	-	-	-	-	-	○	○	○	-	-	-	-	-
Line	acLine	102	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-
ListBox	acListBox	110	○	-	-	○	-	○	○	-	-	○	○	○	○	○	○	○	○	○	○	-	-	-	-	-
NavigationButton	acNavigationButton	130	-	-	-	-	-	○	○	-	-	○	○	○	○	○	○	○	○	○	○	-	-	-	-	-
NavigationControl	acNavigationControl	129	○	-	-	○	○	○	○	○	-	○	○	○	○	○	○	○	○	○	○	-	-	-	-	○
Unbound ObjectFrame	acObjectFrame	114	-	-	-	-	-	○	○	-	-	○	○	○	-	-	-	○	○	○	○	-	-	○	-	-
OptionButton	acOptionButton	105	○	-	-	○	-	○	○	-	-	○	○	○	○	○	○	○	○	○	○	-	-	-	-	-
OptionGroup	acOptionGroup	107	○	-	-	○	-	○	○	-	-	○	○	-	-	-	-	-	○	○	○	-	-	-	-	-
Page	acPage	124	-	-	-	-	-	○	○	-	-	-	-	-	-	-	-	-	○	○	○	-	-	-	-	-
PageBreak	acPageBreak	118	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-	-
Rectangle	acRectangle	101	-	-	-	-	-	○	○	-	-	-	-	-	-	-	-	-	○	○	○	-	-	-	-	-
SubForm	acSubForm	112	-	-	-	-	-	-	-	-	-	○	○	-	-	-	-	-	-	-	-	-	-	-	-	-
Tab	acTabCtl	123	-	-	-	-	○	○	○	-	-	-	-	-	○	○	○	-	○	○	○	-	-	-	-	-
TextBox	acTextBox	109	○	-	-	○	○	○	○	○	-	○	○	○	○	○	○	○	○	○	○	-	-	-	-	○
ToggleButton	acToggleButton	122	○	-	-	○	-	○	○	-	-	○	○	○	○	○	○	○	○	○	○	-	-	-	-	-
WebBrowserControl	acWebBrowser	128	○	-	○	○	○	○	○	○	○	○	○	○	○	○	○	○	○	○	○	○	○	○	-	-

何故か

Accessはフォームを扱う性質上コントロールが多くなりがち。
個別にイベント定義を書いていくと散らかりがち。
プロパティウィンドウが散らかりがち。

という理由から、イベントを1箇所にまとめて扱うというのはよくやる手法。
まとめ方は色々あると思うが、個人的にはフォームのロード時に
使用するしないは関係なくすべてのコントロールにイベントの着火先を定義する方法を好んで使う。
例えばすべてのボタンはクリックされると関数 OnClickEvent を自身のコントロール名付きで呼び出し、
OnClickEvent はコントロール名に応じて対応する処理を行う。
コードの視認性がよく気に入っている。

Private Sub Form_Load()
    On Error Resume Next
    Dim con As Control
    For Each con In Me.Controls
        con.OnClick = "=OnClickEvent(""" & con.Name & """)"
        con.OnChange = "=OnChangeEvent(""" & con.Name & """)"
        
        '～以下省略～
    
    Next
    On Error GoTo 0
End Sub

Private Function OnClickEvent(ByVal ctrName As String)
    Select Case ctrName
        Case "Btn_ファイル読み込み"
            '処理
            
        Case "Btn_メール送信"
            '処理
        
        Case "Btn_閉じる"
            DoCmd.Close acForm, Me.Name

        ' などなど

    End Select
End Function

しかし手抜きというか、Form_Load 内で On Error Resume Next を使用していた。
(LabelにAfterUpdateなど、エラーを無視してすべてのコントロールにイベントをブチ込んでいくイメージ)

美しくないので、ちゃんとコントロールタイプごとに振り分けようと思ったのだが、
Microsoft公式リファレンスでは
「イベント => それに対応したコントロール」 を一覧するのに苦労したので。

参考文献

Microsoft Access 公式リファレンス
https://docs.microsoft.com/ja-jp/office/vba/api/overview/access/object-model