VB Webbrowser控件如何屏蔽右键

前端之家收集整理的这篇文章主要介绍了VB Webbrowser控件如何屏蔽右键前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
  1. '引用Microsoft HTML OBject Library
  2. '加入webbrowser控件
  3. '在窗体上自定义一个菜单(设为MyMenu)
  4. '复制下面代码,运行即可禁止右键菜单
  5.  
  6. '====窗体代码====
  7. Dim WithEvents M_Dom As MSHTML.HTMLDocument
  8. Private Function M_Dom_oncontextmenu() As Boolean
  9. M_Dom_oncontextmenu = False
  10. End Function
  11. Private Sub Webbrowser1_DownloadComplete()
  12. Set M_Dom = Webbrowser1.Document '好了,右键菜单没有了
  13. me.PopupMenu mymenu '弹出自定义菜单
  14. End Sub

猜你在找的VB相关文章