SortIconsMenu

'Dichiarazioni

Declare Function ArrangeIconicWindows Lib "User" (ByVal hWnd As Integer) As Integer
Declare Function GetDesktopWindow Lib "User" () As Integer

'Utilizzo:

Dim DeskHandle As Integer
Dim Ret As Integer

DeskHandle = GetDesktopWindow()

Ret = ArrangeIconicWindows(DeskHandle)