中文字幕av无码不卡免费_蜜臀AV无码精品人妻色欲_亚洲成AV人片在线观看无码不卡_无码专区天天躁天天躁在线

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

為什么用自己寫的窗口下單,會彈出確認框? [金字塔]

  • 咨詢內容: 請教 為什么用自己寫的窗口下單,會彈出確認框?
    昨天還沒有,今天改了幾句代碼就這樣

    此主題相關圖片如下:13.jpg

     

  • 金字塔客服:

    if not hangqing is nothing then

             ctp=Order.StockType(symbol,matketID)
             if ctp=1 then
                strDate = Cstr(hangqing.Date)
                'test_tuoke_Label5.caption = strDate
                
                dim num
        dim orderid
        dim ConSign
        dim Filled
        dim R1
        dim Action
        dim OrderType
        dim LmtPrice
        dim Account
        dim Kaiping
        num = Order.OrderInfoByCode2(hangqing.Label,hangqing.marketName, orderid, ConSign, Filled, R1, Action, OrderType, LmtPrice, Account, Kaiping)
        application.MsgOut num
        if num > 1 then
         if lastOrderID = orderid then
          CancelCount = CancelCount + 1
         else
          CancelCount = 0
          lastOrderID = orderid
         end if
         if (CancelCount > 2) then
          call Document.DebugFile("D:\OrderLog.Txt", "CancelOrder:%.2f",orderid )
          call Order.CancelOrder(orderid)
          CancelCount = 0
         end if
        end if
             
                if CountIndex > 5 then
                 dim BuyHoding
         dim BuyTodayHoding
         dim SellHoding
         dim SellTodayHoding
         dim BuyCost
         dim SellCost
         dim PNL
         Dim UseMargin
                 call Order.HoldingInfoByCode2(hangqing.label,hangqing.marketname,BuyHoding,BuyCost,BuyTodayHoding,SellHoding,SellCost,SellTodayHoding,PNL,UseMargin)
                 if BuyHoding > 0 then
                  application.MsgOut  hangqing.LowerLimitPrice
                  application.MsgOut  hangqing.NewPrice
                  msg = "Sell= " & hangqing.LowerLimitPrice
                  msg = msg & "  BuyHoding=" & BuyHoding
                  msg = msg & "  num= " & num
                  call Document.DebugFile("D:\OrderLog.Txt", msg,1)
                  call Order.Sell(0,BuyHoding,hangqing.LowerLimitPrice,0,hangqing.label,hangqing.marketname,"",0)
                  CountIndex = 0
                  
                 end if
                end if
                txt = " Buy= " & hangqing.UpperLimitPrice
                call Document.DebugFile("D:\OrderLog.Txt", txt, 1)
                call Order.Buy(0,lots,hangqing.UpperLimitPrice,0,hangqing.label,hangqing.marketname,"",0)
                CountIndex = CountIndex + 1
                
             elseif ctp=0 then
              msgbox "IB賬戶不支持交易"
       end if
       
      end if  

     

  • 用戶回復: if not hangqing is nothing then
       'test_tuoke_Label1.caption = hangqing.NewPrice
             ctp=Order.StockType(symbol,matketID)
             if ctp=1 then
                strDate = Cstr(hangqing.Date)
                'test_tuoke_Label5.caption = strDate
               
                'dim num
        'dim orderid
        'dim ConSign
        'dim Filled
        'dim R1
        'dim Action
        'dim OrderType
        'dim LmtPrice
        'dim Account
        'dim Kaiping
        'num = Order.OrderInfoByCode2(hangqing.Label,hangqing.marketName, orderid, ConSign, Filled, R1, Action, OrderType, LmtPrice, Account, Kaiping)
        'if num > 1 then
         'if lastOrderID = orderid then
          'CancelCount = CancelCount + 1
         'else
          'CancelCount = 0
          'lastOrderID = orderid
         'end if
         'if (CancelCount > 2) then
          'call Document.DebugFile("D:\OrderLog.Txt", "CancelOrder:%.2f",orderid )
          'call Order.CancelOrder(orderid)
          'CancelCount = 0
         'end if
        'end if
             
                if CountIndex > 5 then
                 dim BuyHoding
         dim BuyTodayHoding
         dim SellHoding
         dim SellTodayHoding
         dim BuyCost
         dim SellCost
         dim PNL
         Dim UseMargin
                 call Order.HoldingInfoByCode2(hangqing.label,hangqing.marketname,BuyHoding,BuyCost,BuyTodayHoding,SellHoding,SellCost,SellTodayHoding,PNL,UseMargin)
                 if SellHoding > 0 then
                  application.MsgOut  hangqing.UpperLimitPrice
                  application.MsgOut  hangqing.NewPrice
                  msg = "SellShort= " & hangqing.UpperLimitPrice
                  msg = msg & "  SellHoding=" & SellHoding
                  msg = msg & "  num= " & num
                  call Document.DebugFile("D:\OrderLog.Txt", msg,0)
                  call Order.SellShort(0,SellHoding,hangqing.UpperLimitPrice,0,hangqing.label,hangqing.marketname,"",1)
                  'msgbox hangqing.UpperLimitPrice
                  'msgbox SellHoding
                  CountIndex = 0 
                 end if
                end if
                txt = " BuyShort= " & hangqing.NewPrice
                call Document.DebugFile("D:\OrderLog.Txt", txt, 0)
                call Order.BuyShort(0,lots,hangqing.NewPrice,0,hangqing.label,hangqing.marketname,"",1)
                CountIndex = CountIndex + 1
                
             elseif ctp=0 then
              msgbox "IB賬戶不支持交易"
       end if
      end if

     

  • 網友回復:

    2樓的代碼直接下單,3樓的代碼就會彈出一樓的提示。

    是在搞不懂這連個代碼有什么區別。

    注銷部分是撤單的部分,應該不影響。

     

  • 網友回復: 非交易時段下單時,就是會彈出對話框的,因為需要對話框彈出讓你來調整預埋單還有價格

 

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

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


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

相關文章

    沒有相關內容
中文字幕av无码不卡免费_蜜臀AV无码精品人妻色欲_亚洲成AV人片在线观看无码不卡_无码专区天天躁天天躁在线

国产精品影音先锋| 精品成人免费| 国产一区欧美| 久久美女艺术照精彩视频福利播放| 欧美亚洲视频一区二区| 国产精品一级| 欧美一级免费视频| 国产一在线精品一区在线观看| 久久久久久一区| 午夜久久久久久久久久一区二区| 国产一区二区三区无遮挡| 久久久久免费观看| 日韩小视频在线观看| 国产精品日韩二区| 久久视频在线视频| aⅴ色国产欧美| 国产日韩精品综合网站| 久热精品视频在线| 亚洲深夜福利| 韩国三级在线一区| 欧美日韩卡一卡二| 欧美一区91| 亚洲女爱视频在线| 亚洲国产婷婷香蕉久久久久久| 国产精品h在线观看| 久久成人免费日本黄色| 亚洲三级毛片| 国产一区二区日韩| 国产亚洲精品自拍| 国模精品娜娜一二三区| 一区二区三区在线视频免费观看| 欧美日韩一区二区三区在线看 | 久久久欧美一区二区| 久久久久女教师免费一区| 久久久久综合网| 男同欧美伦乱| 午夜国产不卡在线观看视频| 亚洲国产日本| 国产午夜精品久久久久久免费视| 欧美人成在线视频| 久久av在线| 亚洲一区久久| 亚洲久久成人| 韩日欧美一区| 亚洲国产精彩中文乱码av在线播放| 国产精品人人做人人爽人人添| 欧美高清免费| 久久久久国色av免费看影院 | 国产精品免费视频观看| 国产日韩欧美在线一区| 欧美日韩在线不卡一区| 美女久久网站| 欧美中文字幕视频在线观看| 久久亚洲春色中文字幕| 欧美亚洲一区二区三区| 久久久久久久一区二区三区| 午夜精品剧场| 久久综合999| 欧美日韩综合视频| 国产在线欧美| 国产情侣久久| 亚洲国产小视频| 国产免费一区二区三区香蕉精| 欧美色图五月天| 欧美成人免费大片| 巨胸喷奶水www久久久免费动漫| 欧美福利视频| 你懂的亚洲视频| 国产精品二区影院| 亚洲成色999久久网站| 在线播放日韩| 亚洲成人直播| 亚洲永久精品大片| 麻豆精品91| 欧美freesex8一10精品| 美女露胸一区二区三区| 欧美日韩国产在线一区| 欧美日韩国产综合网| 国产一区二区| 在线播放精品| 91久久在线| 日韩一级在线| 亚洲一级二级在线| 亚洲欧美资源在线| 欧美在线啊v一区| 欧美精品一区二区三区四区| 欧美日本视频在线| 激情一区二区三区| 午夜精品久久| 欧美日韩免费一区| 国产精品高潮呻吟久久av黑人| 影音先锋中文字幕一区| 亚洲欧美激情诱惑| 久久精品成人| 免费在线视频一区| 欧美日韩另类视频| 亚洲国产欧美一区二区三区同亚洲| 91久久在线播放| 久久久亚洲高清| 国产精品自拍一区| 在线亚洲免费| 久久动漫亚洲| 国产精品第三页| 日韩一级精品| 午夜在线电影亚洲一区| 久久美女艺术照精彩视频福利播放| 欧美成人激情视频免费观看| 国产一区激情| 欧美亚洲综合网| 欧美/亚洲一区| 国产精品分类| 国产在线精品自拍| 亚洲欧美在线x视频| 国产精品99一区| 在线一区观看| 欧美影院成人| 欧美成人免费在线视频| 国模私拍一区二区三区| 午夜亚洲伦理| 国产欧美精品一区aⅴ影院| 亚洲综合大片69999| 噜噜噜噜噜久久久久久91| 国产中文一区| 久久精品亚洲乱码伦伦中文| 欧美激情久久久久| 国产女同一区二区| 亚洲黄一区二区三区| 久色婷婷小香蕉久久| 一区精品久久| 欧美77777| 亚洲免费高清视频| 欧美少妇一区二区| 激情五月综合色婷婷一区二区| 一区二区久久| 久久亚洲一区二区| 国产精品美女久久久| 亚洲国产精品久久久久秋霞不卡| 亚洲一级在线| 欧美jjzz| 亚洲激情在线观看| 欧美日本一区| 亚洲一区日韩在线| 国产日本欧洲亚洲| 久久婷婷影院| 亚洲国产一区二区在线| 欧美日韩亚洲天堂| 午夜精品99久久免费| 国外成人网址| 欧美激情精品久久久久久蜜臀| 国产亚洲va综合人人澡精品| 亚洲最新色图| 国产精品国产成人国产三级| 亚洲看片一区| 国产精品大片wwwwww| 亚洲精品欧美日韩专区| 欧美日韩国产精品专区| 亚洲国产日韩欧美在线99| 欧美日韩第一区日日骚| 亚洲综合导航| 国产精品福利在线观看| 欧美在线播放| 国产欧美日韩精品专区| 久久精品在线免费观看| 亚洲激情综合| 国产精品a久久久久| 久久精品视频99| 国产欧美成人| 久久亚洲捆绑美女| 99国内精品久久久久久久软件| 欧美成人精品h版在线观看| 狠狠色狠狠色综合人人| 欧美主播一区二区三区| 亚洲激情另类| 国产精品五区| 亚洲欧美激情视频在线观看一区二区三区| 国产婷婷一区二区| 欧美激情1区| 午夜视频在线观看一区| 亚洲国产福利在线| 国产精品伦理| 欧美aⅴ99久久黑人专区| 亚洲一区自拍| 国产精品视频男人的天堂| 美女国内精品自产拍在线播放| 在线精品观看| 乱码第一页成人| 亚洲视频在线视频| 国产精品白丝jk黑袜喷水| 久久成人免费视频| 日韩一级网站| 欧美美女喷水视频| 久久久久国产精品麻豆ai换脸| 一区二区三区 在线观看视频| 国产自产高清不卡| 欧美亚男人的天堂| 毛片一区二区| 久久9热精品视频| 亚洲图色在线| 国产女主播一区二区| 欧美激情第一页xxx|