检测已安装程序名称版本号及版本名称

'检测已安装的CAD版本（检测注册表信息） Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '软件安装注册表根结点 其它程序也是类似的 Dim key As Global.Microsoft.Win32.RegistryKey = Global.Microsoft.Win32.Registry.LocalMachine _ .OpenSubKey("Soft