Доступ к параметру объекта из объекта внутри него

Question

Я кодирую программу, в которой у меня есть класс внутри другого класса. Мне нужно знать, могу ли я получить доступ к свойствам внешнего класса из внутреннего.

Что-то вроде этого:

Module mod1 

    Public Class c1 
     Public var1 As Integer = 3 

     Public Class c2 

      Public Sub doSomething() 
       'I need to access var1 from here. Is it possible? 
      End Sub 

     End Class 

    End Class 

End Module 

Большое спасибо заранее за вашу помощь!

EDIT: Пример того, что я хочу сделать

Dim obj1 As New c1 'Let's suppose that the object is properly initialized 
Dim obj2 As New obj1.c2 'Let's suppose that the object is properly initialized 

obj2.doSomething() 'Here, I want to affect ONLY the var1 of obj1. Would that be possible? 

Answer 1

Вы все еще будете нуждаться, чтобы создать связь между этими двумя объектами где-то. Вот пример того, как вы могли это сделать.

Dim obj1 As New c1 
Dim obj2 As New c2(obj1) 

obj2.doSomething() 

йоЗотеЬЫпд теперь могут влиять как переменные, определенные в c1 и c2. Выполнение проекта:

Public Class c1 
    Public var1 As Integer = 3 
End Class 

Public Class c2 
    Private linkedC1 As c1 

    Public Sub New(ByVal linkedC1 As c1) 
     Me.linkedC1 = linkedC1 
    End Sub 

    Public Sub doSomething() 
     'I need to access var1 from here. Is it possible? 
     linkedC1.var1 += 1 
    End Sub 

End Class