试了一下,应该没问题啊,是不是别的类模块代码有语法错误呢?
Sub MyTest()Set HistroyData = marketdata.GetHistoryData("SRX00","ZQ",5)End Sub