Vb.net 从Windows Media Player 12获取当前歌曲数据

我一直在寻找这个问题的答案，我觉得没有办法，但我想我会问的

我正在寻找一个VB.net应用程序，获取并显示在Windows Media Player中播放的歌曲的艺术家和标题。我不想在我的应用程序中嵌入播放器，只是从已经存在的窗口中提取数据

我发现的关于如何实现这一点的大部分内容都很旧，或者与嵌入WMP有关。我想用MWP12做这件事。我还看到了使用AxWindowsMediaPlayer.currentMedia属性的引用，但这似乎不再有效。我以前可以从注册表中提取数据，但似乎微软把它拿走了

我尝试了很多其他的代码，但这就是我目前拥有的。我束手无策

Imports WMPLib

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim wmp As WindowsMediaPlayer = New WindowsMediaPlayer
        Dim playlist As IWMPPlaylist = wmp.currentMedia.???????(????).Item(?)
        Label1.Text = playlist.getItemInfo("Title")
    End Sub

End Class

不知道到哪里去，但是谢谢你的帮助