A little help

[Luis Moises Rojas]

I am newbie in VB.NET. I just trying to create a xml file and then read back.
What is wrong in this code?
The File is not created
Imports System.Xml.Serialization.XmlSerializer
Imports System.IO
Imports System.Console
Module Module1

Sub Main()

End Sub
Sub testingXml()
Dim Ser As New Xml.Serialization.XmlSerializer(GetType(Customer))
Dim Cust As New Customer(1, "Luis Moises", "EL CARIBE", "Santo Domingo")
Dim Fs As New FileStream("c:\lmr\customer.xml", FileMode.Create)
Ser.Serialize(Fs, Cust)
Fs.Close()

Dim Fs2 As New FileStream("c:\lmr\customer.xml", FileMode.Open)
Dim Cust2 As New Customer
Cust2 = CType(Ser.Deserialize(Fs2), Customer)
Fs2.Close()
End Sub

Public Class Customer
Dim ID As Integer
Dim Nombre As String
Dim Direccion As String
Dim Ciudad As String
Sub New()

End Sub
Sub New(ByVal id As Integer, ByVal nombre As String, ByVal direccion As String, ByVal ciudad As String)
Me.ID = id
Me.Nombre = nombre
Me.Direccion = direccion
Me.Ciudad = ciudad
End Sub
End Class

End Module

[dynamic_sysop]

you need to declare the Class " Dim Cust As New Customer " before declaring the XmlSerializer at a guess , because your trying to get an empty type with the part that says ... (GetType(Customer))
, eg:

Dim Cust As New Customer(1, "Luis Moises", "EL CARIBE", "Santo Domingo")
 
Dim Ser As New Xml.Serialization.XmlSerializer(GetType(Cust))