DLookup関数 - アクセス・Access2013

アクセス・Access2013のDLookup関数の使い方です。
DLookup関数はVBAで使用し、指定したデータを検索する、非常によく使い便利な関数です。

構文： DLookup( 検索するフィールド名 , テーブル名かクエリ名 , 検索条件（省略可）)

■使用例
検索元の商品販売テーブルです。

●実行したVBAコード－ 商品販売テーブルから検索条件を指定せずに、商品コードを検索します
Private Sub コマンド3_Click()
    Dim s1 As String
    s1 = DLookup("商品コード", "T_商品販売")
    MsgBox s1
End Sub

最終レコードの商品コードが返りました。

●実行したVBAコード－ 商品販売テーブルからIDが5の商品コードを検索します
Private Sub コマンド3_Click()
    Dim s1 As String
    s1 = DLookup("商品コード", "T_商品販売", "ID=5")
    MsgBox s1
End Sub

IDが5のレコードの商品コード「SI-6」が返りました。