Как определить const как объект в Excel VBA?

Question

У меня есть объект

xmlHttp = CreateObject("MSXML2.xmlhttp")

Как мне сохранить этот объект (объект xmlhttp) как const?

Пример

Public xmlHttp As ... = CreateObject("MSXML2.xmlhttp")

Answer 1

Объекты не могут быть Const.Только примитивные типы типа Integer могут.Кроме того, VBA не имеет понятия поля только для чтения.Вы можете имитировать это, используя личное поле в модуле и Public Property Get Xmlhttp() в этом модуле.

Answer 2

Как указал Гарри, Объекты не могут быть Constants.

Тем не менее, вы можете рассмотреть возможность использования классов для имитации этого поведения и поля только для чтения.См. эту статью на сайте Чипа Пирсона , чтобы узнать больше о классах.