Private im As Image  Â
Private imPath As String
Public WriteOnly Property ImageFormPath() As String
       Set(ByVal value As String)
           im = Image.FromFile(value)
       End Set
End Property
Public WriteOnly Property Images() As Image
       Set(ByVal value As Image)
           im = value
       End Set
End Property
