飞狐版【股东查询】
-
相关简介:一品老师作的【股东查询】----助您找到心中的最爱深受大家的喜欢,由于免费版找不到专业财务数据,使大家深表遗憾,为解决这一缺憾,我特此献上自己新编的F10资料列表源码,喜欢的请顶一下。 F10资料列表源码: GDW0:=F10FIND('【十大流通股东】:',1000); GDT0:=F10TEXT(GDW0,0); gdw1:=f10find('截止日期',gdw0); gdt1:=f10text(gdw1,0); gdw2:=f10find('序号',gdw1+72); gdt2:=f10t
-
文章来源:公式网 发布时间:2009-11-18浏览次数:
一品老师作的“【股东查询】----助您找到心中的最爱”深受大家的喜欢,由于免费版找不到专业财务数据,使大家深表遗憾,为解决这一缺憾,我特此献上自己新编的F10资料列表源码,喜欢的请顶一下。
F10资料列表源码:
GDW0:=F10FIND('【十大流通股东】:',1000);
GDT0:=F10TEXT(GDW0,0);
gdw1:=f10find('截止日期',gdw0);
gdt1:=f10text(gdw1,0);
gdw2:=f10find('序号',gdw1+72);
gdt2:=f10text(gdw2,0);
gdw3:=f10find('1│',gdw2+72);
gdt3:=f10text(gdw3,72);
gdw4:=f10find('2│',gdw3+72);
gdt4:=f10text(gdw4,72);
gdw5:=f10find('3│',gdw4+72);
gdt5:=f10text(gdw5,72);
gdw6:=f10find('4│',gdw5+72);
gdt6:=f10text(gdw6,72);
gdw7:=f10find('5│',gdw6+72);
gdt7:=f10text(gdw7,72);
gdw8:=f10find('6│',gdw7+72);
gdt8:=f10text(gdw8,72);
gdw9:=f10find('7│',gdw8+72);
gdt9:=f10text(gdw9,72);
gdw10:=f10find('8│',gdw9+72);
gdt10:=f10text(gdw10,72);
gdw11:=f10find('9│',gdw10+72);
gdt11:=f10text(gdw11,72);
gdw12:=f10find('10│',gdw11+72);
gdt12:=f10text(gdw12,72);
DRAWTEXTex(c,0,0,5,gdt0);
DRAWTEXTex(c,0,0,20,gdt1);
DRAWTEXTex(c,0,0,35,gdt2);
DRAWTEXTex(c,0,18,50,gdt3);
drawtextex(c,0,18,65,gdt4);
drawtextex(c,0,18,80,gdt5);
drawtextex(c,0,18,95,gdt6);
drawtextex(c,0,18,110,gdt7);
drawtextex(c,0,18,125,gdt8);
drawtextex(c,0,18,140,gdt9);
drawtextex(c,0,18,155,gdt10);
drawtextex(c,0,18,170,gdt11);
drawtextex(c,0,12,185,gdt12);
GDC0:=F10FIND('1.主要指标:',100);
GDD0:=F10TEXT(GDc0,0);
gdc1:=f10find('指标名称',gdc0);
gdd1:=f10text(gdc1,25);
gdc2:=f10find('每股收益(元)',gdc1);
gdd2:=f10text(gdc2,30);
gdc3:=f10find('每股净资产(元)',gdc2);
gdd3:=f10text(gdc3,30);
gdc4:=f10find('每股资本公积金(元)',gdc3);
gdd4:=f10text(gdc4,30);
gdc5:=f10find('每股现金净流量(元)',gdc4);
gdd5:=f10text(gdc5,30);
gdc6:=f10find('净资产收益率(%)',gdc5);
gdd6:=f10text(gdc6,30);
gdc7:=f10find('总股本(万股)',gdc6);
gdd7:=f10text(gdc7,30);
gdc8:=f10find('实际流通A股(万股) ',gdc7);
gdd8:=f10text(gdc8,30);
DRAWTEXTex(c,0,500,35,gdd0);
DRAWTEXTex(c,0,530,50,gdd1);
DRAWTEXTex(c,0,500,65,gdd7);
DRAWTEXTex(c,0,500,80,gdd8);
DRAWTEXTex(c,0,500,95,gdd2);
DRAWTEXTex(c,0,500,110,gdd3);
DRAWTEXTex(c,0,500,125,gdd4);
DRAWTEXTex(c,0,500,140,gdd5);
DRAWTEXTex(c,0,500,155,gdd6);
GDe0:=F10FIND('行业预测评级',900);
GDf0:=F10TEXT(gde0,12);
gde1:=f10find('评级日期',gde0);
gdf1:=f10text(gde1,72);
gdf2:=f10text(gde1+150,72);
gdf3:=f10text(gde1+227,72);
gdf4:=f10text(gde1+302,72);
gdf5:=f10text(gde1+377,72);
gdf6:=f10text(gde1+453,72);
DRAWTEXTex(c,0,0,200,gdf0);
DRAWTEXTex(c,0,6,215,gdf1);
DRAWTEXTex(c,0,0,230,gdf2);
DRAWTEXTex(c,0,0,245,gdf3);
DRAWTEXTex(c,0,0,260,gdf4);
DRAWTEXTex(c,0,0,275,gdf5);
DRAWTEXTex(c,0,0,290,gdf6);
GDg0:=F10FI


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