Question

如何用VB制作一个自动更换电脑桌面背景的程序？求指导

Answer 1

要用到其它电脑上面，你还得把图片也放过去是吧不过你可以用图片收藏里那几个经典的图片，所有的电脑都有 注册表改背景的键值如下： 在“注册表编辑器”中依次展开 HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\ 在该注册表项下建立名为 System 的项（如在Policies分支下已有System项，则无须此步骤） 在 System 项下建立名为 Wallpaper 和 WallpaperStyle 的两个“字串符值” 对于字串符值定义的念弊解释： Wallpaper 有两个可以定义的值： 空 或 某图片具体路径位置及文件名（路径可以允许设为本地路径或 UNC 路径） 如果 Wallpaper 字串符值为空，则桌面背景固定为添加该字串符值前所设的图片，且在“显示属性”中的“桌面”选项卡中的“背景”框中呈不可操作状。并且在“资源管理器”中浏览图片时，右键.jpg、.bmp图片文件中的上下文菜单的“设为桌面背景”操作将无效。但是该法有一缺点，使用第三方工具如ACDSee依旧可以更改桌面背景。 （注：此项比“组策略”法中的"阻止更改桌面"策略略强，能使得上下文菜单中的“设为桌面背景”无效） 如果 Wallpaper 字串符值设置为某图片或Html文件的路径及文件名（如F:\abc.jpg或F:\abc.html），那么桌面背景将强制更改为该值中所指定的图片文件或Html文件（F:\abc.jpg或F:\abc.html），且在“显示属性”中的“桌面”选项卡中的“背景”框中仍然呈不可操作状，并且第三方工具的桌面背景设置将无效。但是该法也有一缺点：桌面上的图标将消失“阴影”特效，很是难看。 WallpaperStyle 有三个可以定义的值： 0＝居中 1＝平铺 2＝拉伸 当 WallpaperStyle 设置为上述三个值（数字）中的一个，那么将强制“显示属性”中的“桌面”选项卡中的“位置”下拉菜单为对应值效果，并同样呈不可操作状。 更多信息： · 在上述的注册表项(System 项）中建立名为 NoDispBackgroundPage 的 DWORD 值，且定义键值为 1 （有效，相反设为0为无效），则“显示属性”中将没有“桌面”选项卡。（此项对应“组和手策略”中的 "本地计算机"策略/用户配置/管理模板/控制面板/显示 中的 隐藏“桌面”选项卡 策略） ·在下面注册表项中新建名为 ActiveDesktop 的项 HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\ 并在 ActiveDesktop 项中建立名为 NoChangingWallPaper 的DWORD值，定义键值为1（有效，相反设为0为无效），则“显示属性”中的“桌面”选项卡下的“背景”、“浏览”和“位置”下拉菜单呈不可操作状（此键值对应“组策略”的 "本地计算机"策略/用户配置/管理模板/控制面板/显示 列表下的"阻止更改墙唤高嫌纸"策略）。图片文件的上下文菜单中的“设为桌面背景”和第三方工具均可更改桌面背景。 你好，（此内容转载为其它用户的回答） .

Answer 2

http://zhidao.baidu.com/question/117053612.html