共2 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：如何把数组传递到自定义函数中
1楼
linxingywei 发表于：2017/8/17 15:58:16比如我要计算数组中的最大值，我传数组n()进自定义函数中，m是数组的个数，然后把数组n()中的元素赋值给新的数组Arr1，然后计算出数组的最大值，运行这个函数报类型不匹配，请问要怎么修改？
Function MAX_ARRN(Formula,n(),m)
'系统会在逐K线模式解释公式时的每个周期都会调用此函数一遍，因此设计时应该注重程序的执行效率，不要重复的执行一些没必要的代码
Dim Arr1
Redim Arr1(m-1)
for j=0 to m-1
Arr1(j)=n(j+1)
next
max =0
for i=0 to m-1
if(max<Arr1(i)) then max = Arr1(i)
next
MAX_ARRN=max
End Function
Function MAX_ARRN(Formula,n(),m)
'系统会在逐K线模式解释公式时的每个周期都会调用此函数一遍，因此设计时应该注重程序的执行效率，不要重复的执行一些没必要的代码
Dim Arr1
Redim Arr1(m-1)
for j=0 to m-1
Arr1(j)=n(j+1)
next
max =0
for i=0 to m-1
if(max<Arr1(i)) then max = Arr1(i)
next
MAX_ARRN=max
End Function
2楼
王锋 发表于：2017/8/17 22:03:31自定义函数无法传递数组的
共2 条记录, 每页显示 10 条, 页签:
[1]