WebBrowser 怎么屏蔽鼠标右键
5个回答
2011-03-06
展开全部
'引用 Microsoft HTML OBject Library引用方法是在VB里点 菜单里的工程,引用,找到后前边打对号就行了将下边的代码复制到程序里!
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
End Sub
Private Sub Form_Load()
Me.WebBrowser1.Navigate "http://www.soso.com"
End Sub
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
End Sub
Private Sub Form_Load()
Me.WebBrowser1.Navigate "http://www.soso.com"
End Sub
深圳市容大彩晶科技有限公司
2024-11-20 广告
2024-11-20 广告
作为深圳市容大彩晶科技有限公司的工作人员,对于公司广告机的功能有一定的了解。公司的广告机是否支持多语言显示,具体需根据产品型号和功能配置来确定。但一般而言,现代广告机通常具备多语言显示的功能,以适应不同国家和地区的需求。建议直接查阅产品说明...
点击进入详情页
本回答由深圳市容大彩晶科技有限公司提供
展开全部
WebBrowser1.IsWebBrowserContextMenuEnabled = False
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
ncontextmenu() As Boolean
Webbrowser1.Document.oncontextmenu = False
End Function
Webbrowser1.Document.oncontextmenu = False
End Function
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
ncontextmenu() As Boolean
Webbrowser1.Document.oncontextmenu = False
End Function
Webbrowser1.Document.oncontextmenu = False
End Function
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
对一楼的答案表示同意
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询