大伊人青草狠狠久久-大伊香蕉精品视频在线-大伊香蕉精品一区视频在线-大伊香蕉在线精品不卡视频-大伊香蕉在线精品视频75-大伊香蕉在线精品视频人碰人

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

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  有需要幫忙請點擊這里留言?。。? title=進行 有償 編寫!不貴!點擊查看價格!


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

相關文章

    沒有相關內容
主站蜘蛛池模板: 国产第一综合另类色区奇米 | 在线观看 亚洲 | 亚洲美女视频在线观看 | 国产视频一区在线播放 | 国产你懂得 | 国产玖玖在线观看 | 七月婷婷精品视频在线观看 | 成年男女免费视频观看性 | 四虎影免看黄 | 91在线看片| 欧美激情日本一道免费视频 | 日韩精品另类天天更新影院 | 国产呦系列 欧美呦 日韩呦 | 99在线观看精品视频 | 色综合综合| 国产精品久久久久这里只有精品 | 国内精品视频一区 | 午夜探花| 国产网红自拍 | 97看看| 哪个网站能看毛片 | 欧美日韩黄色大片 | 国产综合欧美日韩视频一区 | 大色佬视频在线观看 | 久久久www成人免费精品 | 亚洲国产日韩在线一区 | 国产亚洲综合视频 | 成人精品一区二区不卡视频 | 青草青青在线观看免费视频 | a一级毛片视频免费看 | 天天插天天射天天操 | 国产成人精品福利色多多 | 国产欧美亚洲三区久在线观看 | 特级一级黄色片 | 国产精品香蕉成人网在线观看 | 亚洲精品视频免费观看 | 波多野结衣在线一区二区 | 免费在线a | 婷婷五月在线视频 | 国产日韩不卡免费精品视频 | 亚洲免费中文字幕 |