Visual Basic 6 - Come cambiare lo sfondo con Vb 2010?

Ciao a tutti ,
e da un po di tempo che cerco di capire come mai non riesco a cambiare lo sfondo nel desktop con vb6; in tutte le guide c'è scritto :

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 Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


        Dim t As Long
        Dim Wallpaper As String
        Wallpaper = InputBox("Introduci il path completo")

        If Wallpaper = "" Then Exit Sub
t = SystemParametersInfo(ByVal 20, vbnostring, ByVal Wallpaper, &H1)
        If t = 0 Then
            MousePointer = 0
            MsgBox("Errore !")
            Exit Sub
        End If
    End Sub

Mi segna errore in ByVal 20, vbnostring, ByVal Wallpaper e dice prevista espressione
Mi segna errore in ByVal lpvParam As Any e dice 'As Any' non è supportato nelle istruzioni 'Declare'

Cosa devo fare?Dove sbaglio ?
Grazie a tutti.

se sei su vb.net è ovvio che non va... quello è vb6...

Dai un'occhiata qua:
dreamincode.net/forums/topic/79510-change-desktop-wallpaper/

comunque devi anche tenere conto del sistema operativo su cui operi.. ad esempio su xp non ci dovrebbero essere problemi, però su windows 7 non sono tanto sicuro che tu possa farlo dato i sistemi di sicurezza che ha (e che sinceramente ritengo molto invadenti :P)