Конкретно по факту вопроса (звиняюсь, время пока нет:(

IgorMОтветьте, пожалуйста, я Вам это сделал?
Игорь, покажите, если можно, где в вашем листинге видно, что классы наследованы друг от друга? Где Implements, Property Let/Get?

IgorM Guest_333Игорь, покажите, если можно, где в вашем листинге видно, что классы наследованы друг от друга? Где Implements, Property Let/Get?
А для чего? Вы выставили некоторые условия, написали код и объявили, что средствами Access нельзя добиться аналогичной функциональности. Разве не так?
Я объясню. На самом деле целью задумки было не только установление факта "а можно ли это в принципе", но и демонстрация того, что вообще реализация "наследования" в VB является страшно жутким геморроем, о чем я и говорил в своем первом посте. Вы привели в VB-листинге только критические участки кода, я же 100%-но рабочий код VFP. Если под рукой есть VFP - можете проверить. Для того, чтобы ваш пример стал рабочим нужно накатать еще тучу строк... руками... Вот и сравнивайте простоту реализации. Очень, кстати, забавно, что в поиске по местному форуму VB по запросу Implements выдается всего 4 темы. Так часто пользуемся прекрасным VB-наследованием, видимо? Не от того ли, что это так "удобно" и дает тучу возможностей?

IgorMОбъясню еще раз, последний, объявление в дочернем классе объекта-предка и написание свойств, которые обеспечат доступ к свойствам базовых классов, является едиственно возможным способом наследования в VBA, плохим или хорошим это другой вопрос.
Не надо так реагировать. Последний-не последний... Вы доказываете с йцук-ом, что в VB замечательное наследование, я же - что оно фуфловое и беспомощное. Мы по разные стороны баррикад - что уж тут поделать. А завтра, в другом топике, может мы будем вместе отбиваться от Дельфистов, к примеру. Заметьте, термины типа "объектно-ориентированная п...обратия" тут употребляла совсем другая личность.

Итого, на тукущий момент, мы имеем:
1. В VB/VBA нельзя создать класс формы и уже из него создавать новые экземпляры форм
2. В VB/VBA нельзя визуально наследовать базовые контролы (что прекрасно продемонстрировал пример c классом ресайза и Tag)
3. Как следствие, нельзя визуально на форму из библиотеки классов класть субклассированные контролы
4. Организация наследования и интерфейса и _эмуляция_ наследования реализации страшно геморройны. Чем больше иерархия классов, чем больше свойств и методов проходит через наследовние, тем больших трудов стоит это наследование организовать

IgorMПоэтому-то я и говорю, что примеры "ущербности" наследования VBA нужно выбирать тщательнее
....
И то, что оно "фуфловое и беспомощное" по-моему Вы доказываете неубедительно.
.....

Я не знаю, что же еще мне нужно раскопать про VB-наследование для убедительности, после всего этого:

Guest_333Итого, на тукущий момент, мы имеем:
1. В VB/VBA нельзя создать класс формы и уже из него создавать новые экземпляры форм
2. В VB/VBA нельзя визуально наследовать базовые контролы (что прекрасно продемонстрировал пример c классом ресайза и Tag)
3. Как следствие, нельзя визуально на форму из библиотеки классов класть субклассированные контролы
4. Организация наследования и интерфейса и _эмуляция_ наследования реализации страшно геморройны. Чем больше иерархия классов, чем больше свойств и методов проходит через наследовние, тем больших трудов стоит это наследование организовать

Guest_333
IgorM

OK. Метод MyMethod класса Class3
Как будет тут? Как будет это работать?

* Могу ли я написать (в Вашем варианте кода, в последней строке самого вызова):
Нет? Тогда какое же это наследование?
* Если я объявлю в Class1 новую переменную Property0 - появится ли она автоматом в Class3? (без_моего_вмешательства_руками в описание классов Class2 и Class3). Нет? Тогда какое же это наследование?
* Если я создам в Class1 новый метод MyMethod0 - появится ли он автоматом Class3? Нет? Тогда какое же это наследование?

Для достижения всего этого извраты в описании интерфейсов руками делать надо? Тогда какое же это наследование?
IgorM


(смею предполагать, что в VFP это возможно).
Да, это возможно. И, само собой, не только "This" (что является прямым аналогом "Me" в VB), но и извне кода класса:


IgorM А сам tag был выбран для того, что бы эти свойства прописывать визуально в конструкторе, т.к. наследника контрола на форму не положить, а ручками в коде устанавливать свойства не хочется.



Для того, кто активно пользуется нормальной для ООП реализацией наследования в C++, Delphi, C#, VB.Net, VFP - уже все давно убедительно. Еще более убедительно было бы, если бы Вы предоставили полный код примера на VB, чтобы всем были видны извраты, нужные для наследования интерфейса в VB. Лично же для меня пункта №1 уже достаточно, чтобы считать невозможным для себя переход на VB по доброй воле. Кто-то использует субклассирование широко, кото-то нет. Я не представляю себе работу без нормальной реализации этой фичи. Я встречал Дельфистов, которые кроме как перетаскиванием компонент с галереи больше ничем не пользовались - и чувствовали себя счастливыми, а "ООП в Паскале" знали только как словосочетание. Ну и замечательно, пусть колбасят дальше

IgorMЧитали врезку из MSDN? Вот MS говорит, что "interface inheritance" очень даже ничего.
Мне абсолютно все равно как, что, и чем называет MS, если я это нахожу для себя неприменимым в работе. Пусть хоть "interface inheritance" оно называется, хоть "super mega new technology". Курица, от того, что ее называют птицей, летать не будет все равно

IgorM 1. В VB/VBA нельзя создать класс формы и уже из него создавать новые экземпляры форм
Опять расплывчато. Пример просить не буду, только отмечу, если я Вас првильно понял, то визуально действительно - нельзя, в коде - можно.
Вот, что именно я имел в виду:
Save As Class Dialog Box (Microsoft Visual FoxPro)
MSDNLets you save a form, or selected controls on a form, as a class definition. Create a class if you intend to create subclasses based on the form or reuse the controls for other forms.
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dv_foxhelp/html/lngcreate_form.asp]CREATE FORM [FormName | ?] [AS cClassName FROM cClassLibraryName | ?]
MSDNCreates a new form from a form class in a .vcx visual class library.