Code
      
      
        

                
          ??
        
        
          //
        
        
          c#???
        
        
          

        
        
          ??
        
        
          private
        
        
          ?
        
        
          void
        
        
          ?getSoftwareList()???
          

           ??{???
          

           ??Microsoft.Win32.RegistryKey?rk?
        
        
          =
        
        
          ?Microsoft.Win32.Registry.LocalMachine.OpenSubKey(
        
        
          @"
        
        
          SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
        
        
          "
        
        
          );???
          

           ????
          

           ??String[]?names?
        
        
          =
        
        
          ?rk.GetSubKeyNames();???
          

           ????
          

           ??
        
        
          foreach
        
        
          (String?s?
        
        
          in
        
        
          ?names)?????
          

           ??{???
          

           ??????textbox1.Text
        
        
          +=
        
        
          (s
        
        
          +
        
        
          "
        
        
          \r\n
        
        
          "
        
        
          );
          

           ??}???
          

           ??}
        
      
    
  

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

?

獲取本機已安裝的軟件列表C#/VB.NET（Get the list of installed software in local pc）