Arkadaslar fazla bir aciklamaya gerek yok. user32.dll yardimi ile masaustu resmini degistirecegiz..

Form'a bir adet buton ekliyoruz.

Kodlar
PHP Code:
Imports System.Runtime.InteropServices
Public Class Form1

Public Shared Function SystemParametersInfo(ByVal intAction As Integer, ByVal intParam As Integer, ByVal strParam As String, ByVal intWinIniFlag As Integer) As Integer
End Function
Private Shared SPI_SETDESKWALLPAPER As UInt32 = 20
Private Shared SPIF_UPDATEINIFILE As UInt32 = &H1
Private dosyadi As [String]

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Try
Dim open As OpenFileDialog = New OpenFileDialog
open.Title = "Resim Sec"
open.Filter = "Tum Dosyalar(*.*)|*.*|JPG(*.jpg)|*.jpg|PNG(*.png)|*.pn g"
If open.ShowDialog = Windows.Forms.DialogResult.OK Then
dosyadi = open.FileName
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, dosyadi, SPIF_UPDATEINIFILE)
MsgBox("Masaustu resmi degistirildi")
End If
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub
End Class


Umarim birilerinin isine yarar
Calismalarinizda Basarilar..
__________________