Ciao
Per serializzare l'oggetto, non devi fare altro che assegnare alla classe l'attributo Serializable, quindi usare un XmlSerializer (per la serializzazione xml) o un BinaryFormatter per eseguire la serializzazione.
Eccoti l'esempio:
<Serializable()> _
Public Class PrintDGV
Dim p_dgv_prop(10) As Col_prop
Public Property DGV_property(ByVal row As Integer) As Col_prop
Get
Return p_dgv_prop(row)
End Get
Set(ByVal value As Col_prop)
p_dgv_prop(row) = value
End Set
End Property
Public Sub New()
'Inizializza ogni elemento dell'array
For i As Integer = 0 To p_dgv_prop.Length - 1
p_dgv_prop(i) = New Col_prop()
Next
End Sub
End Class
Con questi due metodi serializzi e deserializzi (sono metodi generici, così puoi riutilizzarli per ogni tipo)
E questo è un modo in cui potresti usarlo:
'Crea l'oggetto da serializzare
Dim obj As New PrintDGV()
'Serializza l'oggetto in binario
'(per serializzare in xml passa True)
Serialize(obj, "C:\out.dat", False)
'Deserializza l'oggetto da binario
Dim newObj As PrintDGV = DeSerialize(Of PrintDGV)("C:\out.dat", False)
Luca