人人爽天天爽夜夜爽qc-人人爽天天爽夜夜爽曰-人人天天爱天天做天天摸-人人天天夜夜-色网站在线-色网站在线看

您現在的位置:程序化交易>> 期貨公式>> 金字塔等>> 金字塔知識>>正文內容

pel公式調用VB自定義函數,傳遞字符串的問題 [金字塔]

  • 咨詢內容: VB自定義函數不支持傳遞字符串參數,搜索了好一會兒,可以用超全局變量解決。但遇到問題,不能正常傳遞,問題會出在哪兒了?
    公式:GLOBALVARIABLE:買入信號='買入';    //這里的‘字符串’是你自己取的變量名testtxt();

    自定義函數:Function testtxt(Formula)    '系統會在逐K線模式解釋公式時的每個周期都會調用此函數一遍,因此設計時應該注重程序的執行效率,不要重復的執行一些沒必要的代碼    testtxt=0    MSG=document.getextData("買入信號")     MsgBox  "傳遞字符串:" & MSGEnd Function
    運行彈出的對話框提示:“傳遞字符串:100057”,最后變成了數字?

     

  • 金字塔客服:
    此主題相關圖片如下:qq截圖20130911122009.jpg

     

  • 用戶回復:

    好吧,之前對字符串的問題,在論壇搜索過的,但沒有找到解決辦法。

    王管應說的是這個帖子的10樓吧:http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=9511

    if VBuy then

    begin

      buy(1,1,limitr,VOP);       {開多}

      if islastbar and bb<>barpos then

       begin

          bb:= barpos;

          extgbdataSet('字符串','開多信號:'+numtostr(close,0));    //這里的‘字符串’是你自己取的變量名

          VQQM:=QQMSSG(close,open);

       end

    end; 

    在VBA的自定義函數中這樣寫:

       QQMSG=document.getextData("字符串")              '獲取公式中設置的變量值

       Set obj = CreateObject("WWSCommon.TCGroup")
       call obj.TransMessage(QQNum, QQMSG)
       Set obj = Nothing

     

     

    但根據這個方法,重新試了一下,還是不對,彈出窗口依然顯示的是數字?

     

      if islastbar then
       begin
          extgbdataSet('買入信號','開多信號:'+numtostr(close,0));    //這里的‘字符串’是你自己取的變量名
          VQQM:=QQMSSG();
       end
       bb:1;

     

     

    Function QQMSSG(Formula)
        '系統會在逐K線模式解釋公式時的每個周期都會調用此函數一遍,因此設計時應該注重程序的執行效率,不要重復的執行一些沒必要的代碼
        QQMSSG=0
        QQMSG=document.getextData("字符串")              '獲取公式中設置的變量值
        MsgBox QQMSG

    End Function

     

  • 網友回復:

    字符串的操作要用

     

    EXTGBSTRING( )
    EXTGBSTRINGSET( , )

     

    這2個函數

     

  • 網友回復:

    感謝回復!

     

    EXTGBSTRING( )和EXTGBSTRINGSET( , ) 是試過的,但是沒有得到預期的結果,

    是下面的代碼有問題嗎?

    運行后,依然提示不對?郁悶!

      if islastbar then
       begin
          EXTGBSTRINGSET('買入信號','開多信號:'+numtostr(close,0));    //這里的‘字符串’是你自己取的變量名
          VQQM:=QQMSSG();
       end
       bb:1;

     

    Function QQMSSG(Formula)
        '系統會在逐K線模式解釋公式時的每個周期都會調用此函數一遍,因此設計時應該注重程序的執行效率,不要重復的執行一些沒必要的代碼
        QQMSSG=0
        QQMSG=document.GetExtString("買入信號")              '獲取公式中設置的變量值
        MsgBox QQMSG

    End Function

 

有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友

可聯系技術人員 QQ: 1145508240  有需要幫忙請點擊這里留言!!!進行 有償 編寫!不貴!點擊查看價格!


【字體: 】【打印文章】【查看評論

相關文章

    沒有相關內容
主站蜘蛛池模板: 男人香蕉好大好爽视频 | 午夜影院免费看 | 天干天干啦夜天天天视频 | 一级毛片在播放免费 | 亚洲欧美日韩天堂 | 欧美在线日韩在线 | 天天狠天天透天天伊人 | 在线观看深夜观看网站免费 | 精品精品国产理论在线观看 | 日韩手机在线免费视频 | 性爱免费视频 | 国产欧美日韩一区二区三区在线 | 亚洲精品综合久久 | 殴美一级毛片 | 国产成人精品一区二三区2022 | 午夜视频在线观看区二区 | 98精品国产高清在线看入口 | 午夜激情在线 | 制服女子校生在线调教 | 香港三级日本三级三级人妇99 | 香蕉视频一级 | 色黄啪啪网18以下勿进动画 | 日本久久中文字幕 | 免费黄色三级 | 亚洲黄网站wwwwww | 欧美黑人巨大日本人又爽又色 | 日本视频www | 成人91| 亚洲女同志videos | 天天色成人 | 在线日韩三级 | 久久综合九色综合狠狠97 | 久久国产精品免费专区 | 日韩中文字幕免费在线观看 | 夜夜操天天摸 | 91在线视频免费播放 | 午夜日韩在线 | 亚洲一区二区精品视频 | 亚洲欧美视屏 | 特级毛片s级全部免费 | 亚洲免费在线视频观看 |