Just this afternoon i decided to look into properties and realized they would be really good for the program im currently working on.
i have this code and only this code in a class module:
when i try to compile it gives me an error:Code:Private Type Deviations Average As Double Deviation As Double End Type Dim Dev As Deviations Public Property Get Deviation() As Double Deviation = Dev.Deviation End Property Public Property Get Average() As Double Average = Dev.Averages End Property Public Property Set Deviation(SetValue As Double) Dev.Deviation = SetValue End Property Public Property Set Average(SetValue As Double) Dev.Average = SetValue End Property
Definitions of property procedures for the same property are inconsistent or property procedure has an optional parameter, a ParamArray, or an invalid Set final parameter
so whats up?




Reply With Quote