>>92

Public Sub proc1()
Dim rs As New ADODB.Recordset
proc2 (rs)
End Sub

Public Sub proc2(rs As ADODB.Recordset)
End Sub

これで、コンパイルエラー は出ませんが、実行時に、proc2 を呼ぶ時に、
"型が一致しません" とエラーが出ます。