代碼如下：

if kk then
BEGIN
    if mark>0 then    
        tsell(1,lots,lmt,c-hd*mindiff),ORDERQUEUE;  //如果有持多單則賣出  
   
    tbuyshort(1,lots,lmt,c-hd*mindiff),ORDERQUEUE;
     if mark>0 then
        dbexecute('insert into tradedetail(StockDate,StrId,StrName,StockCode,MyHoldings,OrderPrice,Operation) values (now(),"zzsd","pursuev2-if","IF",0,'+ numtostr(dynainfo(7),2) +  ',"平多") ');
       
    DBEXECUTE('update pursueextrem set remark=-1 where stockcode = "IF"');
    dbexecute('insert into tradedetail(StockDate,StrId,StrName,StockCode,MyHoldings,OrderPrice,Direction,Operation) values (now(),"zzsd","pursuev2-if","IF",' + numtostr((-1)*lots,0) + ',' +numtostr(dynainfo(7),2) + ',' + numtostr(-1,0) + ',"開空")');
end;

數據庫的數據插入是有他自己的規則算法,不能保證一定是順序存放

如果你希望數據在調用時能夠按照順序,那么你應該在數據庫中加入一個索引字段,比如ACCESS有自增的類型或者你自己通過數值相加的等等.在讀取數據庫數據時,用SQL 的ORDER BY 排序語法讀取數據