Как обращатся "вышестоящему" ?

[solarx]

По ходу дела возник вопрос. Пример:

Код: Выделить всё

public class One
  sub new()
    Public var As Integer = 1
    Dim two as New two
  end sub
end class

public class two
  sub new()
    Dim three as New three
  end sub
end class

public class three
  sub new()
    var = ???   
  end sub
end class


Как в результате в конкретном инстансе класса Three получить значение переменной из инстанса класса One, родившего этот Three?

Обязательно нужно передавать ссылку на него в каждый нижестоящий конструктор или можно без этого обойтись?[/code]

[Dmitriy Solomnikov]

public class One
sub new()
Public var As Integer = 1
Dim two as New two
end sub
public function getVar() as integer
return var
end sub
end class

public class three
sub new()
dim one as new One
var = one.getVar
end sub
end class

[gaidar]

Желательно и почти обязательно передавать ссылку. Создайте поле Parent и помещайте в енего ссылку. Конечно, есть один обходной путь, но это уже из серии шаманства и размахивания руками и годится лишь для некоторых специфичных объектов.

[solarx]

Если не затруднит, очень интересно было бы узнать про этот обходной путь.

Еще - я тут рылся в msdn, наткнулся там на некий указатель MyBase, который вроде как похож на искомоею, судя по описанию, но честно говоря я так и не понял как оно работает.

[hCORe]

MyBase позволяет работать с методами базового класса из наследованного класса. Тебе это не подойдёт. Наследование реализации должно использоваться только в одном случае: когда есть неопровержимая связь "родитель-потомок" ("вид-подвид" и т.д.) между классами (например, класс "автомобиль" можно объявить производным от "транспортного средства", а от класса "программист" - нельзя!)