XML VB.Net

Imports System
Imports System.Xml.Serialization
Imports System.IO
Public Class MainClass
   Shared Sub Main()
        Dim emp As New Employee("Joe", "Yin")
        Dim string_writer As New StringWriter()
        Dim serializer As New XmlSerializer(GetType(Employee))
        serializer.Serialize(string_writer, emp)
        Console.WriteLine(string_writer.ToString)
   End Sub 
End Class
     _
    Public Class Employee
        Public FirstName As String
        Public LastName As String
        Public Sub New()
        End Sub
        Public Sub New(ByVal first_name As String, ByVal last_name As String)
            FirstName = first_name
            LastName = last_name
        End Sub
    End Class