获取本机已安装的软件列表C#/VB.NET（Get the list of installed software in local pc）

Please try the following code, it will work:

Code

'vb.net

Private Sub getSoftwareList()

Dim rk As Microsoft.Win32.RegistryKey = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall")

Dim names As String() = rk.GetSubKeyNames

For Each s As String In names

textbox1.Text&=s+vbCtrf;

Next

End Sub

http://forums.asp.net/t/1306676.aspx