Чтение свойств объекта с помощью процедур Property Get

Чтение свойств объекта с помощью процедур Property Get

Процедура Property Get подобна процедуре типа Function в том смысле, что она возвращает значение - конечно же, значение свойства, Как и в случае процедуры типа Function, значение, которое должно быть возвращено, присваивается имени процедуры, которое в данном случае оказывается именем свойства. Вот опять фрагмент предыдущего примера:

Public Property Get Temperaturef) As Single

Temperature = sngDegrees

End Property

Другие части вашей программы могут вызывать процедуру Get Temperature, чтобы присвоить возвращаемое этой процедурой значение переменной либо использовать это возвращаемое значение в условных операторах, как в следующем примере: sngCurrent Setting = Thermostat.Temperature

If Thermostat.Temperature > 80 Then

MsgBox "Рекомендуется снизить температуру!"

End If