"Abrir Com..." Aplicativo Não Reproduz Arquivo Ao Selecioná-lo

[Marcio_Silva73]

Olá, pessoal!
Sou novato e do Brasil e é uma honra estar aqui com vocês.
Estou tentando fazer com meu uma um arquivo ".mp3" seja reproduzido ao mesmo abrir o meu aplicativo
Sendo que já está configurado no Windows como "Padrão" e coloquei até o código abaixo, o arquivo abre o aplicativo como teria que ser, pois é padrão mas o aplicativo não reproduz.
Fico grato desde já pelas respostas. 

Aqui está o Código:

 ' Associação à definir  no Registro


            Dim file_MP3 As String = ".mp3" ' extensão selecionada
            Dim appName As String = ProductName ' Nome do seu aplicativo

            ' Criar a chave no Registro para a associação de arquivo
            Dim NameKey As String = "Software\Classes\{file_MP3}"
            Dim key As RegistryKey = Registry.CurrentUser.CreateSubKey(NameKey)
            key.SetValue("", appName) ' Definir o nome do aplicativo como padrão para este tipo de arquivo
            key.Close()

            ' Criar a subchave para o nome do aplicativo
            key = Registry.CurrentUser.CreateSubKey("Software\Classes\{appName}\shell\open\command")
            key.SetValue("", Application.ExecutablePath & " %1")
            key.Close()