一個小疑問(編號：5145)

Private Sub Command1_Click()
DisplaySupports Adodc1.Recordset
　　　　　　　　　^^^^^^^^^^^^^^^^^
End Sub　　　　　 為甚麼這裡還要加上Adodc1.Recordset呢?
不是呼叫Displaysupports就好了嗎?

Public Sub DisplaySupports(rs As ADODB.Recordset)
Debug.Print "AddNew = " & rs.Supports(adAddNew)
　Debug.Print "Bookmark = " & rs.Supports(adBookmark)
　Debug.Print "Delete = " & rs.Supports(adDelete)
　Debug.Print "HoldRecords = " & rs.Supports(adHoldRecords)
　Debug.Print "Resync = " & rs.Supports(adResync)
　Debug.Print "Update = " & rs.Supports(adUpdate)
　Debug.Print "UpdateBatch = " & rs.Supports(adUpdateBatch)
End Sub