C#

registry.GetMethodParameters("GetStringValue")

registry.InvokeMethod("GetStringValue", inParams, Nothing)

registry.GetMethodParameters("GetBinaryValue")

registry.InvokeMethod("GetBinaryValue", inParams, Nothing)

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
       Dim servername As String = "192.168.71.127"
       Dim options As ConnectionOptions = New ConnectionOptions()
       With options
           .Username = "Administrator"
           .Password = "mypassword"
           .Authority = "ntlmdomain:DOMAIN"
           .Impersonation = ImpersonationLevel.Impersonate
           .Authentication = AuthenticationLevel.PacketPrivacy
       End With
       Dim scope As ManagementScope = New ManagementScope("\\" & servername & "\root\default", options)
       scope.Connect()

       Dim registry As ManagementClass = New ManagementClass(scope, New ManagementPath("StdRegProv"), Nothing)

       Dim inParams As ManagementBaseObject = registry.GetMethodParameters("GetStringValue")
       'inParams("hDefKey") = "HKEY_LOCAL_MACHINE\"
       inParams("sSubKeyName") = "Software\Microsoft\Windows NT\CurrentVersion"
       inParams("sValueName") = "CurrentVersion"
 'inParams("sValueName") = "DigitalProductid"


       Dim outParams As ManagementBaseObject = registry.InvokeMethod("GetStringValue", inParams, Nothing)
       MessageBox.Show(outParams("sValue").ToString)
   End Sub

xml_document = new XDocument();

xml_document.Declaration = new XDeclaration("1.0", "utf-8", "true");

xml_document.Add(new XElement("EventLog"));
XElement event_node = new XElement("Event", new XAttribute("ID", Guid.NewGuid().ToString()));
XElement event_date = new XElement("DateTime", DateTime.UtcNow.ToString("ddd dd MMM yyyy HH:mm:ss"));
XElement event_details = new XElement("Description", event_description);

event_node.Add(event_date);
event_node.Add(event_details);

//append element
xml_document.Add(event_node);

xml_document.Save("eventlog.xml");