[VB6] Mostra desktop da VB6

[Amok]

Salve a tutti ^_^
A tutti suppongo sia noto il tasto "Mostra desktop" che permette di iconizzare tutte le finestre aperte e quindi mostrare il desktop. Ecco io avrei necessità di simulare la pressione di tale tasto da un form visual basic.
Come è possibile realizzarlo?

[GudFella]

    Dim s As Object
    Set s = CreateObject("Shell.Application")
    s.MinimizeAll
    Set s = Nothing

[Amok]

Provato e funziona. Grazie per l'aiuto ^_^