如何在Excel VBA中将const定义为对象？

我有一个对象

xmlHttp = CreateObject("MSXML2.xmlhttp") 

我如何将这个对象（xmlhttp对象）存储为一个const ？

例

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

Answer 1

对象不能是Const 。 只有像Integer这样的原始types可以。 此外，VBA不具有只读字段的概念。 你可以通过在模块中使用私有字段和在该模块上使用Public Property Get Xmlhttp()来模仿这一点。

Answer 2

正如哈里指出的，物体不能是Constants 。

但是，您可以考虑使用类来模拟此行为和只读字段。 请参阅Chip Pearson网站上的这篇文章 ，了解更多关于课程的信息。