WebBrowserコントロールを使用して作成したブラウザから送信するUser-Agentを別名にするには？

WebBrowserコントロールを使用して作成したブラウザから送信するUser-Agentを別名にする方法で困っています。
現在BeforeNavigate2イベントで
----------
If Headers = "" Then
  Web.Navigate2 URL, Flags, TargetFrameName, PostData, Headers + "User-Agent: OK" & vbCrLf
  Cancel = True
Else
----------
という感じでやっているのですが、初回の要求がうまく行きません。
（２回目以降の要求はうまくいくのですが）

ご存知の方教えて下さい。よろしくお願いいたします。