Bonjour,

On pourrait aussi imaginer :

Public Class Personne

   Implements ICloneable

   Public mNom As String
   Public mPrenom As String

   Public Sub New(Nom As String, Prenom As String)
      mNom = Nom
      mPrenom = Prenom
   End Sub

   Public Function Clone() As Personne Implements ICloneable.Clone
      Return New Personne(mNom, mPrenom)
   End Function

End Class

Ainsi on peut se passer de la sérialisation et implémenter l'interface par défaut qui va bien...

c = Text4 * 1 ...

un peu d'algorithmique que diable...