WHERE ID=" & ID, , 4 是什么意思？

On Error GoTo ErrorHandler

    Dim strTemplate As String

    Dim strFileName As String

    Dim objApp As Object    'New Word.Application

    Dim objDoc As Object    'Word.Document

    Dim objField As Object    'Word.Field

    Dim rst As Object

    Dim blnNoQuit As Boolean

    strTemplate = CurrentProject.Path &"\模板\通知单模板.doc" 

   '设置鼠标指针为沙漏形状

    DoCmd.Hourglass True

    Set objApp = CreateObject("Word.Application")

    Set objDoc = objApp.Documents.Open(strTemplate)

    Set rst = CurrentDb.OpenRecordset("SELECT * FROM tbl通知单 WHERE ID=" &ID, , 4)

    If Not rst.EOF Then