Public Class Upload > Friend Sub New() > End Sub > Friend Property SomeProperty() As String > Get > Return m_SomeProperty > End Get > Set > m_SomeProperty = Value > End Set > End Property > Private m_SomeProperty As String > > Friend Function DoSomething(s As String) As String > End Function >End Class > >Public Class PublicClass > Private oUpload As New Upload() > > Public Property SomeProperty() As String > Get > Return oUpload.SomeProperty > End Get > Set > oUpload.SomeProperty = value > End Set > End Property > > Public Function DoSomething(s As String) As String > Return oUpload.DoSomething(s) > End Function >End ClassAh, the famous Get/Set approach, thanks for the info