所以我一直在尝试使用 vbs 文件来更改我在 Windows 10 上的桌面墙纸。vbs 文件包含：
dim shell
Set shell = WScript.CreateObject("WScript.Shell")
wallpaper = "C:\Users\mypc\Pictures\wallpaper.jpg"
shell.RegWrite "HKCU\Control Panel\Desktop\Wallpaper", wallpaper
shell.Run "%windir%\System32\RUNDLL32.EXE user32.dll,UpdatePerUserSystemParameters", 1, True
问题是它并不总是有效。它在我执行它的 10 次中大约有 1 次起作用。vbs 不会抛出任何错误。奇怪的是，注册表项实际上更改为正确的墙纸，但更改并未反映在桌面背景中，就好像它们没有关联或某些东西“卡住”了一样。关于问题可能是什么或如何调试它的任何想法将不胜感激。