excel - VBA 2003 で InStr 関数を使用するには?

Question

以下のコードは、InStr 呼び出しでエラー 5 を返しました。

Option Explicit

Sub Test()
     Dim wb As Workbook
     Dim wbs As Workbooks
     Dim str As String
     Dim LPosition As Integer

     Set wbs = Application.Workbooks
     For Each wb In wbs
        str = wb.Name
        LPosition = InStr(0, str, "_", vbTextCompare)
        MsgBox LPosition
     Next wb
End Sub  

誰かが理由を説明してもらえますか?