以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  如何向自定义函数传递字符串参数  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=6194)
--  作者：jim5jim
--  发布时间：2011/4/18 12:56:22
--  如何向自定义函数传递字符串参数

我定义了一个自定义函数mybuy

Function mybuy(Formula,code)
    msgbox cstr(code)
    mybuy=0
End Function

在公式中这样调用

drawtextex(1,100,100,stklabel);

mybuy(stklabel);

 

上面的代码执行后,drawtextex显示:IF00,msgbox显示"1"

参数传递有问题.请问正确的写法是怎么?

 
--  作者：阿火
--  发布时间：2011/4/18 14:27:14
--  

不能传递字符窜参数

 

考虑传递数值，用数值控制字符窜

比如：

if code=0 then tt="IF00"

end if

 

if code=1 then tt="IF01"

end if

 

MsgBox tt
--  作者：jim5jim
--  发布时间：2011/4/18 14:44:55
--  

系统的tbuy函数有一个字符串参数,TBUY(COND,V,[Type,P1,P2,AC,STOCK]) stock和ac这两个参数都是字串型的.

我的目的是做一个自定义函数,完成类似于tbuy的功能.

不知道系统函数是如何做到这一点的

 

感谢leevolvo的回复
--  作者：guotx2010
--  发布时间：2011/4/18 15:43:28
--  

只能等金字塔增加自定义函数传递字符串功能了！