CodeItBetter Programming Another VB Programming Blog

'System & API - How to set Desktop Wallpaper to None
'To set wall paper to none.
Private Declare Function SystemParametersInfo Lib "user32" Alias _
    "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, _
    ByVal lpvParam As String, ByVal fuWinIni As Long) As Long
 
Sub ChangeWallpaper()
    SystemParametersInfo 20, 0, "", 1
End Sub