直接复制过去，会有很严重的格式问题，导致vbs编译不成功,还不如异次元下个软件解决了
一、新建一个文档，输入如下代码并另存为：
REGEDIT4
[HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\SuperHidden]
@="{00000000-0000-0000-0000-000000000012}"
[HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\InProcServer32]
@=hex(2):25,53,79,73,74,65,6d,52,6f,6f,74,25,5c,73,79,73,74,65,6d,33,32,5c,73,\
68,64,6f,63,76,77,2e,64,6c,6c,00
"ThreadingModel"="Apartment"
[HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\Instance]
"CLSID"="{3f454f0e-42ae-4d7c-8ea3-328250d6e272}"
[HKEY_CLASSES_ROOT\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag]
"method"="ShellExecute"
"Param1"="SuperHidden.vbs"
"command"="显示/隐藏系统文件+扩展名"
"CLSID"="{13709620-C279-11CE-A49E-444553540000}"全国两会召开时间2022和结束时间
有机物和无机物的区别[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced]
"ShowSuperHidden"=dword:00000000
"Hidden"=dword:00000002
二、在新建一个文档，输入代码后另存为：SuperHidden.vbs
'Show/Hide System Files
Dim WSHShell
七年级下册英语期中Set WSHShell = WScript.CreateObject("WScript.Shell")
sTitle1 = "SSH=0"
sTitle2 = "SSH=1"
if WSHShell.RegRead("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden") = 1 then
WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", "0", "REG_DWORD"
WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", "2", "REG_DWORD"
WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", "1", "REG_DWORD"
隐藏的文件怎么显示出来WSHShell.RegWrite "HKCR\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag\command", "低调组合显示系统文件+扩展名", "REG_SZ"
WSHShell.SendKeys "{F5}+{F10}e"
'WSHShell.Popup "Poof, they're gone!", 1, sTitle1, vbInformation
else
WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", "1", "REG_DWORD"
WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", "1", "REG_DWORD"
WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", "0", "REG_DWORD"
WSHShell.RegWrite "HKCR\CLSID\{00000000-0000-0000-0000-000000000012}\Instance\InitPropertyBag\command", "隐藏系统文件+扩展名", "REG_SZ"
WSHShell.SendKeys "{F5}+{F10}e"
'WSHShell.Popup "Here they are!", 1, sTitle2, vbInformation
end if
Set WSHShell = Nothing
WScript.Quit(0)
三、将SuperHidden.vbs拷贝到C盘windows目录下即可，然后双击修改注册表，最后重启一下电脑就可以了（如果安装的杀毒软件弹出阻止对话框时，请勾上总是允许，并将下方的以后总是允许的勾勾上就可以了）。
鼠标右键添加“显示/隐藏 文件扩展名” 
新建一个TXT文本文档，将以下内容复制进去，保存为SuperHidden.vbs，放入C:\Windows目录下 
Dim WSHShell 
Set WSHShell = WScript.CreateObject("WScript.Shell") sTitle1 = "SSH=0" sTitle2 = "SSH=1"  if 
WshSHell.RegRead("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt") = 0 then 
WshSHell.RegWrite 
"HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", "1", "REG_DWORD" 
WshSHell.SendKeys "{F5}+{F10}e" else 
WshSHell.RegWrite 
"HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", "0", "REG_DWORD" 
WshSHell.SendKeys "{F5}+{F10}e" end if 
 
Set WSHShell = Nothing WScript.Quit(0)   
无线密码怎么改再将以下内容复制到TXT，保存为.reg文件，运行即可 
Windows Registry Editor Version 5.00 
[HKEY_CLASSES_ROOT\*\shell\DisplayFileExt] 
@="显示/隐藏 文件扩展名" 
[HKEY_CLASSES_ROOT\*\shell\DisplayFileExt\Command] @=" C:\\Windows\\SuperHidden.vbs" 
[HKEY_CLASSES_ROOT\Directory\Background\shell\DisplayFileExt] @="显示/隐藏 文件扩展名" 
[HKEY_CLASSES_ROOT\Directory\Background\shell\DisplayFileExt\Command] @=" C:\\Windows\\SuperHidden.vbs" 
[HKEY_CLASSES_ROOT\Folder\shell\DisplayFileExt] @="显示/隐藏 文件扩展名" 
[HKEY_CLASSES_ROOT\Folder\shell\DisplayFileExt\Command] 
@=" C:\\Windows\\SuperHidden.vbs" 
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\*\shell\DisplayFileExt] @="显示/隐藏 文件扩展名" 
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\*\shell\DisplayFileExt\Command] @=" C:\\Windows\\SuperHidden.vbs" 
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Directory\Background\shell\DisplayFileExt] 
@="显示/隐藏 文件扩展名" 
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Directory\Background\shell\DisplayFileExt\Command] 
@=" C:\\Windows\\SuperHidden.vbs" 
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Folder\shell\DisplayFileExt] 
@="显示/隐藏 文件扩展名" 
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Folder\shell\DisplayFileExt\Command] @=" C:\\Windows\\SuperHidden.vbs"