飞狐前十名流通股东指标公式
-
相关简介:飞狐前十名流通股东指标公式 QSW:=F10FIND('◆ 大股东进出 ◆',1); jsw:=F10FIND('◆控股股东和实际控制人◆',QSW+1); d1:=F10FIND('前十名无限售条件股东',QSW+1); IF QSW0 AND d10 AND jsw0 THEN BEGIN zj:=F10FIND('总 计',d1+1); 总计:STRTONUM(F10TEXT(zj+40,10)),LINETHICK; WZ1:=F10FIND('%',d1+1); WZ2:=F10FIN
-
文章来源:公式网 发布时间:2012-07-29浏览次数:
飞狐前十名流通股东指标公式
QSW:=F10FIND('◆ 大股东进出 ◆',1);
jsw:=F10FIND('◆控股股东和实际控制人◆',QSW+1);
d1:=F10FIND('前十名无限售条件股东',QSW+1);
IF QSW>0 AND d1>0 AND jsw>0 THEN BEGIN
zj:=F10FIND('总 计',d1+1);
总计:STRTONUM(F10TEXT(zj+40,10)),LINETHICK;
WZ1:=F10FIND('%',d1+1);
WZ2:=F10FIND('%',WZ1+1);
WZ3:=F10FIND('%',WZ2+1);
WZ4:=F10FIND('%',WZ3+1);
WZ5:=F10FIND('%',WZ4+1);
WZ6:=F10FIND('%',WZ5+1);
WZ7:=F10FIND('%',WZ6+1);
WZ8:=F10FIND('%',WZ7+1);
WZ9:=F10FIND('%',WZ8+1);
WZ10:=F10FIND('%',WZ9+1);
股东1:strtonum(f10text(wz1-5,10));
股东2:strtonum(f10text(wz2-5,10));
股东3:strtonum(f10text(wz3-5,10));
股东4:strtonum(f10text(wz4-5,10)),COLORWHITE;
股东5:strtonum(f10text(wz5-5,6));
股东6:s


现在就去充值积分
加入VIP可下载100以下的所有资源