How to get Local Machine Groups using WMI in VB.NET

Dim search As New ManagementObjectSearcher("SELECT * FROM Win32_Group Where LocalAccount = True")
For Each info In search.Get()
 Dim objGroup = GetObject("WinNT://./" & info("Name").ToString &  ",group")
  For Each objMember In objGroup.Members
     Dim info As ManagementObject
     Msgbox(info("Name").ToString)
     Msgbox(objMember.Name) 
  Next 
Next

How to Get List of Softwares installed on a machine

Dim search As New ManagementObjectSearcher("SELECT * FROM Win32Reg_AddRemovePrograms")
Dim info As ManagementObject 
For Each info In search.Get()  
  Msgbox(info("InstallDate"))
  Msgbox(info("DisplayName").ToString)  
  Msgbox(info("Publisher").ToString)
Next