Option Explicit
Option Strict

Imports System
Imports System.IO
Imports System.Xml

Public Class Sample

    Public Shared Sub Main()
        'Create a writer to write XML to the console.
        Dim writer As XmlTextWriter = Nothing
        writer = New XmlTextWriter(Console.Out)

        'Use indentation for readability.
        writer.Formatting = Formatting.Indented
        writer.Indentation = 4

        'Write an element (this one is the root).
        writer.WriteStartElement("book")

        'Write the title element.
        writer.WriteStartElement("title")
        writer.WriteString("Pride And Prejudice")
        writer.WriteEndElement()

        'Write the close tag for the root element.
        writer.WriteEndElement()

        'Write the XML to file and close the writer.
        writer.Close()
    End Sub 'Main 
End Class 'Sample

using System;
using System.IO;
using System.Xml;

public class Sample
{

  public static void Main()
  {
     //Create a writer to write XML to the console.
     XmlTextWriter writer = null;
     writer = new XmlTextWriter (Console.Out);

     //Use indentation for readability.
     writer.Formatting = Formatting.Indented;
     writer.Indentation = 4;

     //Write an element (this one is the root).
     writer.WriteStartElement("book");

     //Write the title element.
     writer.WriteStartElement("title");
     writer.WriteString("Pride And Prejudice");
     writer.WriteEndElement();

     //Write the close tag for the root element.
     writer.WriteEndElement();

     //Write the XML to file and close the writer.
     writer.Close();  

  }

}

#using <System.Xml.dll>

using namespace System;
using namespace System::IO;
using namespace System::Xml;
int main()
{

   //Create a writer to write XML to the console.
   XmlTextWriter^ writer = nullptr;
   writer = gcnew XmlTextWriter( Console::Out );

   //Use indentation for readability.
   writer->Formatting = Formatting::Indented;
   writer->Indentation = 4;

   //Write an element (this one is the root).
   writer->WriteStartElement( "book" );

   //Write the title element.
   writer->WriteStartElement( "title" );
   writer->WriteString( "Pride And Prejudice" );
   writer->WriteEndElement();

   //Write the close tag for the root element.
   writer->WriteEndElement();

   //Write the XML to file and close the writer.
   writer->Close();
}

#using <mscorlib.dll>
#using <System.Xml.dll>
using namespace System;
using namespace System::IO;
using namespace System::Xml;

int main()
{
     //Create a writer to write XML to the console.
     XmlTextWriter* writer = 0;
     writer = new XmlTextWriter (Console::Out);

     //Use indentation for readability.
     writer->Formatting = Formatting::Indented;
     writer->Indentation = 4;

     //Write an element (this one is the root).
     writer->WriteStartElement(S"book");

     //Write the title element.
     writer->WriteStartElement(S"title");
     writer->WriteString(S"Pride And Prejudice");
     writer->WriteEndElement();

     //Write the close tag for the root element.
     writer->WriteEndElement();

     //Write the XML to file and close the writer.
     writer->Close();  

}