Vb.Net Masa Üstü Görseli Değiştirmek

ads

ads

Visual Basic ile masa üstü resim değiştirmek

Forma eklemeniz gereken eklenti:

1 tane button ekleyin. Kodların içinde değiştirmek istediğiniz  resmin URL'sini   yapıştırıp değiştirme işlemini yapabilirsiniz. 

Imports System.Runtime.InteropServices

Public Class Form1
    <DllImport("user32.DLL", CharSet:=CharSet.Auto)> 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 dosyaadi As [String] = "https://lh5.googleusercontent.com/-M4oFcq093kQ/UbH-NuIJOsI/AAAAAAAAVU0/Lm4rhZ8SCRs/h93/logo.png" ' resim adresini bu bölüme ekleyiniz.

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, dosyaadi, SPIF_UPDATEINIFILE)

    End Sub
End Class

ads