中webbrowser中选择文本后自定义右键?
'引用MicrosoftHTMLOBjectLibrary '加入webbrowser控件 '在窗体上自定义一个菜单(设为MyMenu) '复制下面代码,运行即可禁止右键菜单了 '====窗体代码==== DimWithEventsM_DomAsMSHTML.HTMLDocument PrivateFunctionM_Dom_oncontextmenu()AsBoolean M_Dom_oncontextmenu=False EndFunction PrivateSubWebbrowser1_DownloadComplete() SetM_Dom=Webbrowser1.Document'好了,右键菜单没有了 me.PopupMenumymenu'弹出自定义菜单 EndSub
Copyright © 广州京杭网络科技有限公司 2005-2024 版权所有 粤ICP备16019765号
广州京杭网络科技有限公司 版权所有