标题：如何把array数组的值传递给Function lttt

1楼

qq641031325 发表于：2017/9/5 16:48:33

有一个array数组p 经过测试 p里含有计算过的值但是当写 llt=p时报错483 对象不支持此属性或方法

但是案例里

Function CU_MA1(Formula,CLOSE,CYC)

CU_MA1=0

If Formula.WorkMode = 0 Then

Exit Function

End If

DataCount = UBound(CLOSE)

If DataCount <> Formula.DataSize-1 Then

Exit Function

End If

Dim ResultMa

Redim ResultMa(DataCount)

For i = Cyc-1 To Formula.DataSize-1

Count = 0

For k = i-(Cyc-1) To i

Count = Count + CLOSE(k)

ResultMa(i) = Count / Cyc

CU_MA1 = ResultMa

End Function

为什么CU_MA1 = ResultMa却可以或者怎么把array数组里的值给Redim 数组？谢谢

2楼

无为剑 发表于：2017/9/6 0:05:25

只有序列模式下才支持数据形式的返回的，你看看是不是你用了逐K线模式了

3楼

qq641031325 发表于：2017/9/6 7:48:06

还是不行返回的还是array数组最后一个值

4楼

qq641031325 发表于：2017/9/6 7:57:23

写出来了是数组赋值没定义下标

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