Public Property ThisProperty(ByVal ThisParameter As ParameterType) As PropertyType Get ' some code which uses ThisParameter to get a PropertyType value Return Group(ThisParameter) 'example End Get Set (v As PropertyType) ' some code which uses ThisParameter to determine what to use v for Group(ThisParameter) = v 'example End Set End Property