How do i change the desktop wallpaper's picture?
Thanx, Gil

Here you go:
****************************************************************************
*****
To General part of a form
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
Const SPIF_UPDATEINIFILE = &H1
Const SPI_SETDESKWALLPAPER = 20
Const SPIF_SENDWININICHANGE = &H2

****************************************************************************
*****
And Code where ever you want to execute it:
Dim sFile$, lRet&
sFile = "my.bmp"
lRet = SystemParametersInfo(SPI_SETDESKWALLPAPER, 0&, sFile,
SPIF_UPDATEINIFILE Or SPIF_SENDWININICHANGE)
****************************************************************************
*****

Hope that helps,
Aikka

hi Skotti,
Check the MSDN,   Tip 192: Selecting a New Desktop Wallpaper
naveen.