I want to change webbrowser font size to default zoom level using the
following

Private Sub Form_Load()
    ' set font size to normal
    WebBrowser1.ExecWB OLECMDID_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, CLng(2),
vbNull
End Sub

The form contains only Webbrowser control dropped on it. Using VB6 SP5
Instead I am getting Error 80040100 "Method ExecWB of the object
IWebBowerer2 failed"

Any soution to that?

TECH
http://www.*-*-*.com/

Don't have a solution, but thought I'd chime in with this little bit of
unsolicited advice:
If that's for your own system/s, fine ... but if this is a distributable
program, please consider this:
   I am visually impaired, so the first time you mess with my screen
settings, you're gone, great software program or not.  In my life, I
shall be the sole controller of what settable system settings get
modified and which ones do not.  You get my permission (or not) or you
also don't get to run on my systems.
   So at the very least, I hope you're planning an of/off setting for
that "feature", right?

Regards,