验证Block 对象时发现问题　[金字塔]

为了体验金字塔VBA与excel vba区别，以及体验vba在金子塔中的应用，将金子塔帮助文件中的例子粘贴到模块中运行，结果发现验证Block 对象时出现问题：

金字塔帮助文件例子：

对象标识 "Stock.Block"

示例

'创建Block外部对象，将对象实例置变量b中
Set b = CreateObject("Stock.Block")

'打开市场指定分类名称的板块
call b.open("上海A股",0)

'显示已打开板块内部数据个数
msgbox b.count()

问题所在：1、本例运行没有问题。

             2、把本列“上海A股”，换成：上海期货、大连期货、郑州期货，都没有问题。但如果换成“中金所”，结果是0.

再试着换成

中国金融期货交易所，或者英文全名China Financial Futures Exchange，或英文缩写：CFFE，结果全是零。

希望给予回复：liudaliuda668@sohu.com

我帮你转到高级区吧

建议仔细看看OPEN函数的参数类型

Open 方法

打开一个指定名称和类型的板块,将板块中的数据装载到对象中.若之前内部有其他品种数据,那么此操作将会清空原先的内部数据.

Open(Name, Type)

Name     板块名称

Type     板块名称的类别 0:系统分类名称比如'上海A股' 1:分类板块 2:系统板块(可以在品种栏定义中进行更改)

返回值:  若打开板块成功返回1 否则返回0