Varias Preguntas xD

[Cheatmaster]

Buenas pues mirar, la 1º pregunta seria,

¿ Como cambiar desde vb, el fondo de escritorio ?


2º

¿ Como cambiar el ( No reveles tu contraseña etc.. de msn ) ?

Se que esta en esta zona,

HKEY_LOCAL_MAC HINE\SOFTWARE\Microsoft\MessengerService\Policies
Pero como edito para cambiar el mensaje...


Bueno thx y xaus xD

[ziBboh]

Que tal Cheatmaster, creo que esto es lo que buscas.
Esto es para cambiar el BackGround del Escritorio:

Código:

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 Command1_Click()
Dim cHDesk As Integer
    cHDesk = SystemParametersInfo(20, 0, "C:\Fondo.BMP", 0)
End Sub

Y para leer, escribir o borrar REG_SZ usa el objeto "WScript.Shell", creo que hay informacion acerca de eso, sino pues aqui te dejo esto:

Código:

Dim RG As Object
Set RG = CreateObject("WScript.Shell")
    msn = RG.RegRead("HKEY_LOCAL_MAC HINE\SOFTWARE\Microsoft\MessengerService\Policies\Mensaje") ' Donde mensaje es igual a el REG_SZ que quieras leer
    RG.RegWrite ("HKEY_LOCAL_MAC HINE\SOFTWARE\Microsoft\MessengerService\Policies\") & "Mensaje", "Revelame tu contraseña LOSER!"

Espero y te sirva esta info.