access vba 構文の解読

質問

access vba 構文の解読
はじめまして先ほどaccess2003について質問させていただいたものです。以下の構文が先ほどの続きです。こちらも皆様のお力で構文を解読していただけないでしょうか。
すみません解読とは、構文の一行一行が何を示しているのか教えていただけると助かります。
よろしくお願いいたします。

' Exit the application.
Case conCmdExitApplication
CloseCurrentDatabase

' Run a macro.
Case conCmdRunMacro
DoCmd.RunMacro rs![Argument]

' Run code.
Case conCmdRunCode
Application.Run rs![Argument]

' Open a Data Access Page
Case conCmdOpenPage
DoCmd.OpenDataAccessPage rs![Argument]

' Any other command is unrecognized.
Case Else
MsgBox "不明なオプションです。"

End Select

' Close the recordset and the database.
rs.Close

HandleButtonClick_Exit:
On Error Resume Next
Set rs = Nothing
Set con = Nothing
Exit Function

HandleButtonClick_Err:
' If the action was cancelled by the user for
' some reason, don't display an error message.
' Instead, resume on the next line.
If (Err = conErrDoCmdCancelled) Then
Resume Next
Else
MsgBox "コマンド実行中のエラーです。", vbCritical
Resume HandleButtonClick_Exit
End If

End Function

Private Sub メニュー終了_Click()
On Error GoTo Err_メニュー終了_Click

DoCmd.Close

Exit_メニュー終了_Click:
Exit Sub

Err_メニュー終了_Click:
MsgBox Err.Description
Resume Exit_メニュー終了_Click

End Sub

Private Sub 終了_Click()
On Error GoTo Err_終了_Click

DoCmd.Quit

Exit_終了_Click:
Exit Sub

Err_終了_Click:
MsgBox Err.Description
Resume Exit_終了_Click

End Sub

回答No.1

piroin654

このコードはたぶんオフィスがインストール
してある\Program Files\Microsoft Officeの
Templatesの中のサンプルのどれかのコード
だと思いますが、コードの中のコメントアウト
している行には以下の数行づつのコードの
内容が書いてあります。英文ですがそれを
まず読み解いていってわからないところが
あれば質問してみてください。
全部を説明するのは少々しんどい話です。

お礼

夜中に貴重なご意見ありがとうございます。
自分でも解読してみます。

失礼いたします。