Mega Code Archive

 

Categories / VB.Net Tutorial / XML

 

DeSerialize from xml file

Imports System.Xml.Serialization, System.IO Public Class Tester     Public Shared Sub Main            Dim theSerializer As New XmlSerializer(GetType(employee))       Dim sw As New StreamReader("data.xml")       Dim theWorker As employee       theWorker = theSerializer.Deserialize(sw)       Console.WriteLine(theWorker.first_name )       Console.WriteLine(theWorker.last_name )       Console.WriteLine(theWorker.title)     End Sub End Class Public Class employee    Public first_name As String    Public last_name As String    Public title As String    Public Sub New()    End Sub    Public Sub New(ByVal first_name As String,ByVal last_name As String,ByVal title As String)       Me.first_name = first_name       Me.last_name = last_name       Me.title = title    End Sub End Class