Option Strict
Option Explicit

Imports System
Imports System.IO
Imports System.Xml

Public Class Sample

    Public Shared Sub Main()
        ' Create the writer.
        Dim writer As XmlTextWriter = Nothing
        writer = New XmlTextWriter("ws.html", Nothing)

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

        ' Write the xml:space attribute.
        writer.WriteAttributeString("xml", "space", Nothing, "preserve")

        ' Verify that xml:space is set properly.
        If writer.XmlSpace = XmlSpace.Preserve Then
            Console.WriteLine("xmlspace is correct!")
        End If 
        ' Write out the HTML elements.  Insert white space
        ' between 'something' and 'Big'.
        writer.WriteString("something")
        writer.WriteWhitespace("  ")
        writer.WriteElementString("b", "B")
        writer.WriteString("ig")

        ' Write the root end 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 the writer.
    XmlTextWriter writer = null;
    writer = new XmlTextWriter ("ws.html", null);

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

    // Write the xml:space attribute.
    writer.WriteAttributeString("xml", "space", null, "preserve");

    // Verify that xml:space is set properly.
    if (writer.XmlSpace == XmlSpace.Preserve)
      Console.WriteLine("xmlspace is correct!");

    // Write out the HTML elements.  Insert white space
    // between 'something' and 'Big'
    writer.WriteString("something");
    writer.WriteWhitespace("  ");
    writer.WriteElementString("b", "B");
    writer.WriteString("ig");

    // Write the root end 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 the writer.
   XmlTextWriter^ writer = nullptr;
   writer = gcnew XmlTextWriter( "ws.html", nullptr );

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

   // Write the xml:space attribute.
   writer->WriteAttributeString( "xml", "space", nullptr, "preserve" );

   // Verify that xml:space is set properly.
   if ( writer->XmlSpace == XmlSpace::Preserve )
      Console::WriteLine( "xmlspace is correct!" );


   // Write out the HTML elements.  Insert white space
   // between 'something' and 'Big'
   writer->WriteString( "something" );
   writer->WriteWhitespace( "  " );
   writer->WriteElementString( "b", "B" );
   writer->WriteString( "ig" );

   // Write the root end 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 the writer.
    XmlTextWriter* writer = 0;
    writer = new XmlTextWriter (S"ws.html", 0);

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

    // Write the xml:space attribute.
    writer->WriteAttributeString(S"xml", S"space", 0, S"preserve");

    // Verify that xml:space is set properly.
    if (writer->XmlSpace == XmlSpace::Preserve)
        Console::WriteLine(S"xmlspace is correct!");

    // Write out the HTML elements.  Insert white space
    // between 'something' and 'Big'
    writer->WriteString(S"something");
    writer->WriteWhitespace(S"  ");
    writer->WriteElementString(S"b", S"B");
    writer->WriteString(S"ig");

    // Write the root end element.
    writer->WriteEndElement();

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