?
FOR? i=1 to STKCOUNT('自動選股') dobegin
DELETEFROMBLOCK(STKFROMBLK('自動選股',i),'自動選股');? // 測試時候不要清理掉
end;