Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Me.Backgroundimage = My.Resources.*bg*
waarbij je *bg* door de naam van de afbeelding vervangt
een vraagje, ben je wezen googelen?
volgen mij ligt het aan mij of omdat ik XP pro heb maar wat ik ook voor 1 wallpaper heb hij is
steeds blauw
mischien weet iemand de oplossing???
ofwerkt het alleen in visual basic en niet in VB.net HELP!!!
op school is het iets te goed beveiligt dus doet ie het ook nietEhm ligt aan jou windows.
Dit is een code voor VB.net..
dan zet je in de sub (button_click):
Dim Img As Image = My.Resources.*resname*
Img.Save(Application.StartupPath & "/wallpaper.jpg", Imaging.ImageFormat.Jpeg)
SystemParametersInfo(SPI_SETDESKTOPWALLPAPER, 0, Application.StartupPath & "/wallpaper.jpg", _
(SPIF_UPDATEINIFILE Or SPIF_SENDWININICHANGE))
waarbij je *resname* vervangt door de naam van de afbeelding
Imports System
Imports System.Runtime.InteropServices
Public Shared SPI_SETDESKTOPWALLPAPER As Integer = 20
Public Shared SPIF_UPDATEINIFILE As Integer = 1
Public Shared SPIF_SENDWININICHANGE As Integer = 2
Dim Img As Image ="*Orgineel pad*"
Img.Save(Application.StartupPath & "C:/wallpaper.jpg", Imaging.ImageFormat.Jpeg)
SystemParametersInfo(SPI_SETDESKTOPWALLPAPER, 0, Application.StartupPath & "C:/wallpaper.jpg", _
(SPIF_UPDATEINIFILE Or SPIF_SENDWININICHANGE))
Private Declare Sub SystemParametersInfo Lib "User32.dll" Alias "SystemParametersInfoA" (ByVal action As Integer, _
ByVal iparam As Integer, ByVal vparam As String, ByVal opt As Integer)
OpenFileDialog1.Show
SystemParametersInfo(SPI_SETDESKTOPWALLPAPER, 0, OpenFileDialog1.Filename, _
(SPIF_UPDATEINIFILE Or SPIF_SENDWININICHANGE))
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.