Основы офисного программирования и язык VBA


Пример 5.2


Option Explicit

Implements Father Implements Son

Private Property Let Father_MyProperty(ByVal RHS As String) 'Реализация отложена

End Property

Private Property Get Father_MyProperty() As String 'Реализация отложена

End Property

Private Sub Father_MyPureMethod() 'Реализация отложена

End Sub

Private Sub Father_MyRealMethod() 'Реализация отложена MsgBox ("It's the GrandSon") End Sub

Private Sub Son_SonNewMethod() 'Реализация отложена

End Sub

Пример 5.2.

Закрыть окно






Начало  Назад  Вперед



Книжный магазин