Imports System
Imports System.Collections
Imports System.Data
Imports System.IO
Imports System.Xml.Serialization
Imports System.Windows.Forms
Imports System.Xml
Public Class MainClass
Shared Sub Main()
Dim address As New Address()
Dim stream As New FileStream("address.xml", FileMode.Create)
' create a serializer...
Dim serializer As New XmlSerializer(Address.GetType)
' save the file...
serializer.Serialize(stream, address)
' close the file...
stream.Close()
End Sub
End Class
Public Class Address
' members...
Public FirstName As String
Public LastName As String
Public CompanyName As String
Public Address1 As String
Public Address2 As String
Public City As String
Public Region As String
Public PostalCode As String
Public Country As String
Public Email As String
End Class
|