Generic Desktop Icon Shuffling Program

I found some VB6 code over here to get and set icons on the desktop.After converting it to VB.NET and making some minor modifications it should simply save the icon's locations at startup into an array of POINT structures, set all icons to random locations when a button is pressed and put the icons back when the applications exits. When I start the app all icons dissapear and nothing happens when the button is pressed or when I exit (I can get the icons back by aligning them by grid).The VB6 to VB.NET converter gives me a warning when i try to marshal the POINT structure saying that i need special conversion for marshaling non bittable types.

Here's the code:
Imports Microsoft.VisualBasicImports Microsoft.VisualBasic.Compatibility.VB6Imports SystemImports System.Runtime.InteropServicesImports System.Windows.Forms
Imports Project1.Declarations
Friend Partial Class Form1
Inherits System.Windows.Forms.Form
[Code] .....