win10_深浅主题一键切换脚本.vbs

' toggle-theme.vbs —— 一键切换 Win10 深色/浅色（含任务栏）
Set sh = CreateObject("WScript.Shell")
key = "HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes\Personalize"

' 0=深色  1=浅色
app  = sh.RegRead(key & "\AppsUseLightTheme")
sys  = sh.RegRead(key & "\SystemUsesLightTheme")

newApp = 1 - app
newSys = 1 - sys   ' 系统模式取反，任务栏就跟着反

sh.RegWrite key & "\AppsUseLightTheme",      newApp, "REG_DWORD"
sh.RegWrite key & "\SystemUsesLightTheme",   newSys, "REG_DWORD"

' 可选：让设置立即生效
sh.Run " Rundll32.exe user32.dll,UpdatePerUserSystemParameters ", 0, False

保存为 win10_深浅主题一键切换脚本.vbs 双击运行即可，无需管理员权限