WebBrowser zoom control

[JayWangTPE]

Hi,

I run the following code. The exception happens. How can I fix it? Thanks!



Const OLECMDID_OPTICAL_ZOOM = 63
Const OLECMDEXECOPT_DONTPROMPTUSER = 1
Dim MyWeb As Object = Me.WebBrowser1.ActiveXInstance
MyWeb.ExecWB(OLECMDID_OPTICAL_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, 125, IntPtr.Zero)

Continue reading...