获取 千千静听 的安装路径

[wenjunsu]

也就是千千静听 所在的路径

注意代码要是vb.net的形式

在线等 答对就给分

[jsjzzh]

　　下面的例子显示了如何从HKEY_CURRENT_USER读取一个DWORD键值：
　　Imports Microsoft.Win32
　　Dim regVersion As RegistryKey
　　Dim keyValue As String
　　keyValue = Software\\Microsoft\\TestApp\\1.0
　　regVersion = Registry.CurrentUser.OpenSubKey(keyValue, False)
　　Dim intVersion As Integer = 0
　　If (Not regVersion Is Nothing) Then
　　 intVersion = regVersion.GetValue("Version", 0)
　　 regVersion.Close()
　　End If

[jsjzzh]

Imports Microsoft.Win32
Dim TTPlayerPath As RegistryKey


Dim keyValue As String

keyValue = "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Uninstall\\TTPlayer"

TTPlayerPath = Registry.LocalMachine.OpenSubKey(keyValue, False)

Dim path As String

If (Not TTPlayerPath Is Nothing) Then

path = TTPlayerPath.GetValue("AppPath")

End If