有什么办法可以隐藏IE菜单?

来源:百度知道 编辑:UC知道 时间:2024/08/22 01:44:44
文件 编辑 查看 收藏 工具 帮助
把这些菜单隐藏起来,请问大家有什么办法可以实现呢?

用 VB 新建一个工程,然后将以下代码粘贴:
' 隐藏或显示浏览器的 (Windows 资源管理器和 IE) 文件菜单
' 注意:本程序需要 SetRegistryValue,
' DeleteRegistryValue 和 CheckRegistryValue 函数,
' 您可以在 Windows 区段的 CodeBank 中找到它们
'
' 例如:
' ' 隐藏文件菜单 (在下次启动 IE 或 Windows 资源管理器时)
' ShowExplorerFileMenu False
' ' 重新显示它
' ShowExplorerFileMenu

Public Sub ShowExplorerFileMenu(Optional ByVal bShow As Boolean = True)
Dim sKey As String
Const HKEY_CURRENT_USER = &H80000001

sKey = "Software\Microsoft\Windows\CurrentVersion\Policies\Explorer"

If bShow Then
' 删除用于隐藏文件菜单的键
DeleteRegistryValue HKEY_CURRENT_USER, sKey, "NoFileMenu"
Else
' 如果该值不存在
If CheckRegistryKey(HKEY_CURRENT_USER, sKey) = False Then
' 创建该键
CreateRegistryKey HKEY_CURRENT_USER,