Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:请问版主一个过程或函数能传进去一个数组吗

1楼
夏小飞 发表于:2010/11/19 10:53:57

Dim d
Set d = CreateObject("Stock.Array")
d.AddBack(5)
d.AddBack(6)
d.AddBack(10)
d.AddBack(3)
d.AddBack(8)

MsgBox d.Search(10)

function f(s,cyc)
  sum=0
  for i=0 to cyc-1
    sum=sum+s(i)
  next
  f=sum/cyc
end function

xxx=f(d,5)

MsgBox xxx

 

 

我把d传进F函数里 有错 指向sum=sum+s(i) 这一行 请问这个是为什么?

函数是不是不能传进去一个数组?

2楼
wattwei 发表于:2010/11/19 11:37:56
 可以。你用错了
sum=sum+s(i) 改为sum=sum+s.GetAt(i)
3楼
夏小飞 发表于:2010/11/19 11:40:08
谢谢
共3 条记录, 每页显示 10 条, 页签: [1]


Powered By Dvbbs Version 8.3.0
Processed in 0.05859 s, 2 queries.