| 标题 | vb 禁止右击 |
| 范文 | 在用vb做客户端软件用到了引用WebBrowser，在引用的WebBrowser中vb禁止右击，防止用户查看代码 我们在vb中如何实现禁止右击呢？ 第一步是引入对应的工程部件 在“工程/部件”对话框中勾选：Microsoft Internet Controls 在“工程/引用”对话框中勾选：Microsoft HTML Object Library 第二部是写相关的vb禁止右击代码 Dim WithEvents M_Dom As MSHTML.HTMLDocument'通过引用创建dom对象 Private Function M_Dom_oncontextmenu() As Boolean'对dom对象进行操作，当右击时返回false M_Dom_oncontextmenu = False End Function Private Sub Webbrowser1_DownloadComplete()'当浏览器插件加载完毕 Set M_Dom = WebBrowser1.Document '好了，右键菜单没有了将上面的对象设置为浏览器的document End Sub 代码结束，可以测试一下，在vb6.0的基础上运行，测试成功 |
| 随便看 |
|
在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板，是学习及工作的有利工具。