Hola Estoy Tratando de Hacer una aplicacion que cambie el fondo del escritorio de windowx xp....
Pero no meda aqui posteo mi codigo,
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByValuParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long
Private Sub cmdAceptar()
Dim fallo As Integer
fallo = SystemParametersInfo(20, 0, C:\WINDOWS\AROS.BMP", 0)
End Sub
Hola:
Te faltan las comillas:
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long
Private Sub Form_Load()
Dim fallo As Integer
fallo = SystemParametersInfo(20, 0, "C:\WINDOWS\FONDO.BMP", 0)
End Sub
kedaria asi ;)
1S4ludo