港澳资讯 灵通V5.0 ///////////////////////////////////// Q0:=f10find('☆股东研究☆',1); Q1:=f10find('【2.股东变化】',Q0); Q:=f10find('十大流通股东情况',Q1); Z:=f10find('截至日期:2009-03-31 ',Q+100); W_B:=F10TEXT(Q-22,Z-Q); <% H_W=ffl.vardata("W_B") H_W=replace(H_W,vbCrLf,"\n") ffl.vardata("W_B")=H_W %> DRAWTEXTEX(1,0,10,-3,W_b); T1:=STRFIND(W_B,'合计持有',100)+8; T2:=STRFIND(W_B,'合计持有',T1+100)+8; C2:=STRFIND(W_B,'十大流通股东情况',T1)-22; W2:=STRMID(W_b,C2,T2-C2); DRAWTEXTEX(1,0,460,-3,W2); 合计1:STRTONUM(STRMID(W_b,T1,20)),LINETHICK; 合计2:STRTONUM(STRMID(W_b,T2,20)),LINETHICK;{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |