‘引用MicrosoftHTMLOBjectLibrary ‘加入webbrowser控件 ‘在窗体上自定义一个菜单(设为MyMenu) ‘复制下面代码,运行即可禁止右键菜单了 ‘====窗体代码==== DimWithEventsM_DomAsMSHTML.HTMLDocument PrivateFunctionM_Dom_oncontextmenu()AsBoolean M_Dom_oncontextmenu=False EndFunction PrivateSubWebbrowser1_DownloadComplete() SetM_Dom=Webbrowser1.Document’好了,右键菜单没有了 me.PopupMenumymenu’弹出自定义菜单 EndSub
1200字范文,内容丰富有趣,写作的好帮手!