标题：这样引用错在哪

1楼

beensu 发表于：2011/3/28 13:11:55

Function kurt1(Formula,x,n)
kurt1=Function.kurt(x,n)

End Function

2楼

guotx2010 发表于：2011/3/28 15:02:45

kuit1=后面的那个function去掉就行了

3楼

王锋发表于：2011/3/28 15:24:25

Fun.kurt(x,n)

4楼

beensu 发表于：2011/3/29 0:24:58

不行提示编译器错误13 类型不匹配 fun.kurt

5楼

admin 发表于：2011/3/29 8:41:01

kurt的使用方法不对

Dim d '创建一个变量
'创建Array外部对象，将对象实例置变量d中
Set d = CreateObject("Stock.Array")
'创建完Array对象后往其内部插入两个数据
d.AddBack(5)
d.AddBack(6)
d.AddBack(10)
d.AddBack(3)
msgbox Fun.kurt(d)

6楼

beensu 发表于：2011/3/29 22:53:47

Fun.kurt(d) 难道不能控制计算周期吗

7楼

王锋发表于：2011/3/30 7:37:51

Stock.Array 对象会自动管理，上述的示例代码，周期是4，因为添加了4个数据

8楼

beensu 发表于：2011/3/30 17:53:17

如果有1000个数据每次取21个计算如何处理

9楼

王锋发表于：2011/3/30 20:18:26

可以使用d.RemoveAt(0)，和AddBack循环处理这21个数据来计算

共9 条记录, 每页显示 10 条, 页签: [1]