公式网-网站导航


网站搜索:  

股票公式指标网 发表于2009/12/1 7:45:32

港澳F10【十大流通股东】

港澳F10【十大流通股东】

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. 港澳资讯 灵通V5.0   
  2. /////////////////////////////////////   
  3. Q0:=f10find('☆股东研究☆',1);   
  4. Q1:=f10find('【2.股东变化】',Q0);   
  5. Q:=f10find('十大流通股东情况',Q1);   
  6. Z:=f10find('截至日期:2009-03-31 ',Q+100);   
  7. W_B:=F10TEXT(Q-22,Z-Q);   
  8. <%   
  9. H_W=ffl.vardata("W_B")   
  10. H_W=replace(H_W,vbCrLf,"\n")   
  11. ffl.vardata("W_B")=H_W   
  12. %>   
  13. DRAWTEXTEX(1,0,10,-3,W_b);   
  14. T1:=STRFIND(W_B,'合计持有',100)+8;   
  15. T2:=STRFIND(W_B,'合计持有',T1+100)+8;   
  16. C2:=STRFIND(W_B,'十大流通股东情况',T1)-22;   
  17. W2:=STRMID(W_b,C2,T2-C2);   
  18. DRAWTEXTEX(1,0,460,-3,W2);   
  19. 合计1:STRTONUM(STRMID(W_b,T1,20)),LINETHICK;   
  20. 合计2:STRTONUM(STRMID(W_b,T2,20)),LINETHICK;  

 



网站搜索:  



Copyright © 2009-2010 gszb.com ™,All Rights Reserved. 
公式网-www.gszx.com.cn-股票指标公式网