[pax]

Я имел ввиду создание объекта:

Class Foo

  Public myField as Integer

End Class

'Другой класс использует первый как экземпляр

Class Boo

  Public myFoo as Foo = new Foo()

  Public Sub SetFooValue( Value as Integer)
       myFoo.myField = Value;
  End Sub

  Public Function GetFooValue() as Integer
       Return myFoo.myField;
  End Function

End Class

Сто лет на бэйсике не писал, так что могу ошибок наделать, но смотрится вроде правильно ))