模块部分：
Public Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByRef lpvParam As Any, ByVal fuWinIni As Long) As Long
Public Const SPI_SETDESKWALLPAPER = 20
窗体部分：
Private Sub Command1_Click()
SystemParametersInfo SPI_SETDESKWALLPAPER, 0, "d:\1.bmp", 0
End Sub

现在保证图片路径无误，可是为什么点击按钮就是没反应？？？

[此贴子已经被作者于2007-10-3 19:19:30编辑过]

这个我也试了，还是没效果，，，不过书上的代码中，最后一个参数就是用0，，，而且书上的代码可以用，而我的却不行。。。

比对了半天没比对出来到底哪里有问题。。。

我把书上完整的例子传上来：

[此贴子已经被作者于2007-10-3 19:30:14编辑过]

所以我才感到奇怪，那个例子的可以用，而我简化后的代码却不能用，，，是怎么回事啊？？？


不是win95是winme

可是例子在我的机子上运行也没问题啊。。。这是为什么？？？

是啊，不关是那个exe，连代码里面不是也有。。。

我编译了一下，也照样可以用~~~~~

我问的是，，，我简化后的代码为什么就不能用。。。我在一楼发的代码，没反应。。。


我4楼发的那个压缩包是书上的例子！！！

[此贴子已经被作者于2007-10-3 19:46:37编辑过]

我不是白痴

就是我也觉得没错，才找不出错误原因。。。

系统不支持的话，，，简化之前的程序可以用这又怎么解释？？

这就是：