Основы офисного программирования и язык 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




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



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