VB Webbrowser控件如何屏蔽右键

最新推荐文章于 2024-05-17 09:23:02 发布

coffeesweet

最新推荐文章于 2024-05-17 09:23:02 发布

阅读量1.9k

点赞数

分类专栏： VB 文章标签： vb webbrowser dom library 控件

VB 专栏收录该内容

2 篇文章 0 订阅

订阅专栏

'引用Microsoft HTML OBject Library 
'加入webbrowser控件 
'在窗体上自定义一个菜单(设为MyMenu) 
'复制下面代码，运行即可禁止右键菜单了 

'====窗体代码==== 
Dim WithEvents M_Dom As MSHTML.HTMLDocument 
Private Function M_Dom_oncontextmenu() As Boolean 
M_Dom_oncontextmenu = False 
End Function 
Private Sub Webbrowser1_DownloadComplete() 
Set M_Dom = Webbrowser1.Document '好了，右键菜单没有了 
me.PopupMenu mymenu '弹出自定义菜单 
End Sub