Vbs脚本类型不匹配 [String"check_error"]

写了一个挂载xshell的脚本有函数，但是就是说类型有问题，代码如下

Function error (count0)
           xsh.Screen.Send("check_error:" + count0)
           xsh.Screen.Send(VbCr)
           xsh.Dialog.MsgBox("reboot:" +count0)
           xsh.Dialog.MsgBox("check route")
End Function

Sub Main

             dim j:j=2
             error(j)
             xsh.Screen.Send(" route  -ne ")

End Sub

' Function check2(kjl)
        ' check(kjl) = 2
        ' xsh.Screen.Send(" route  -ne | grep 0.0.0.0 | wc -l ")
        ' xsh.Screen.Send(VbCr)
        ' screenrow = xsh.Screen.CurrentRow
        ' data = xsh.Screen.Get(screenrow-1,1,screenrow-1,20)
        ' if CInt(Instr(1,data,"4",1)) = "1"  Then
            ' check(kjl) = 0

        ' End If
' end function