每个成员列表都必须包含一个 EnumMemberLists 子例程，以指定哪些维具有成员列表、每个维的列表数以及每个成员列表的名称。在 EnumMemberLists () 子例程中，使用下表中的语法和函数定义成员列表：
| 语法 | 说明 |
|---|---|
|
Dim ElementLists(n) |
为每个语句指定列表数 其中，Element 是为其创建成员列表的维的名称，n 是为该维定义的成员列表的总数。例如，如果文件包含实体维的三个成员列表，则语法如下所示： Dim EntityLists(3) |
|
HS.Dimension = ""Element" |
其中，Element 是维名。例如： If HS.Dimension = "Entity" Then |
|
ElementLists(n) = "ListName" |
为每个列表指定名称和数字 ID 其中，Element 是维名，n 是成员列表的 ID 号，ListName 是列表名。 可以使用 @POV 关键字基于当前在 POV 中设置的维成员创建动态列表。实体列表中显示的实体基于在报表的 POV 中选择的方案、年份、期间和实体。 例如： EntityLists(1) = "NewEngland" EntityLists(2) = "Alloc" EntityLists(3) = "AllEntities(@POV)" |
|
HS.SetMemberLists ElementLists |
设置指定的名称和数字 ID 其中，Element 是维名。例如： HS.SetMemberLists EntityLists |