<Serializable()> _
Public Class Class1
    Private c As Color
    Public Sub New()
 
    End Sub
 
    Public Property cl() As Integer
        Get
            Return c.ToArgb
        End Get
        Set(ByVal value As Integer)
            c = Color.FromArgb(value)
        End Set
    End Property
End Class