＞それは最初のコードの
　If (Strings.InStr(Me.WebBrowser1.Document.Body.InnerText, ChrW(12450) & ChrW(12513) …
の行で発生しているという事でしょうか。それとも別の作業中に発生したものでしょうか。
また、エラーが発生したときに参照していた Web サイトは? 

あ～修正しますｗ

名前　　　　 値　　　　　　形
InnerText Nothing Object

こんな感じですね。


えと、いろいろな詳細を言うと
WebBrowserプロパティURL＝なし
ログインボタンを押すと＝Me.WebBrowser1.Navigate(("http://pigg.ameba.jp/core/login.do?amebaId=" & Me.TextBox1.Text & "&password=" & Me.TextBox2.Text))
Button1.Visible = Falsh

Ifの文を見直すと
If WebBrowser1.Document.Body.InnerText Like "*アメーバIDもしくはパスワードを確認して下さい*" Then
Button1.Visible = True
Else
Button1.Visible = Flash
WebBrowser1.Visible = True

にすると、Button1がFalsh　WebBrowser1がTrue　になります。

ということです。

そして、僕の予想では "*アメーバIDもしくはパスワードを確認して下さい*"に対するElseなので
勿論、Else以降は"*アメーバIDもしくはパスワードを確認して下さい*"が表示されていない場合の
Button1がFalsh　WebBrowser1がTrue　です。

ということは、最初のページから "*アメーバIDもしくはパスワードを確認して下さい*"を表示されてる状態にしなければなりません。
ですが、それはおそらく無理です。

とりあえず参考URLは
http://pigg.ameba.jp/←ログインしている時と、していない時と、対応が違います。
http://pigg.ameba.jp/core/login.do?amebaId=←上記と一緒。
http://www.ameba.jp/login.do←アメーバIDが入力されていません。パスワードが入力されていません。と出る。
http://www.ameba.jp/logout.do←アメブロのログイン画面が出る

どうしればいいでしょうか。