VB 对象变量或with块变量未设置

先看错误代码，以下代码提示 对象变量或with块变量未设置：

Dim obj As Object
obj = WebBrowser1.Document.getElementById("switcher_plogin")

修改为如下代码即可：

Dim obj As Object
        Set obj = WebBrowser1.Document.getElementById("switcher_plogin")

 参考资料：http://zhidao.baidu.com/link?url=nCeq9MkZU1rFY_lnGT-sncfeM9O5FBnjq8NBbGrpsp2ON4prl3gHo8EoVuJawLwpeKrTQHDK0HPB-ND9KUYdVq