C# / VB.NET - [VB.NET] Registrazione di una nuova estensione

Ciao a tutti, ho un problema: devo registrare un'estensione all'interno del registro di sistema, con tanto di icona personalizzata... sono arrivato a questa conclusione, che non funziona tanto bene e che non mi restituisce l'icona personalizzata:

 
        Dim RegKey As RegistryKey = Registry.ClassesRoot.OpenSubKey(".pms")
        Dim WParam As RegistryKeyPermissionCheck = RegistryKeyPermissionCheck.ReadWriteSubTree
        RegKey = Registry.ClassesRoot.CreateSubKey(".pms")

        If RegKey IsNot Nothing Then
            Exit Sub
        End If

        RegKey = Registry.ClassesRoot.CreateSubKey(".pms", WParam)
        RegKey.SetValue("", "Progetto Math Studio")
        RegKey = Registry.ClassesRoot.CreateSubKey("Progetto Math Studio", WParam)
        RegKey.SetValue("", "Progetto MathStudio")
        RegKey = Registry.ClassesRoot.OpenSubKey("Progetto MathStudio", True)
        RegKey = RegKey.CreateSubKey("shell\open\command", WParam)
        RegKey.SetValue("", String.Format("""{0}"" ""%1""", Application.ExecutablePath))

Mi potreste dare qualche dritta?
Grazie in anticipo

Grazie delle tante risposte, ma ho già risolto, registrando l'estenzione da inno setup