软件名称：[B]F10公式[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：2.00 KB
官方主页：Home Page
更新时间：2011-03-12 08:25:59
软件简介:

冒昧请高手,
能否用公式把港澳资讯的最新分红一行,增发股数和增发价咯(其中有2011年度的增发或2010年度的增发)的一行或两行文字显示在飞狐主图上,如果没有分红或增发则提示无.谢谢!

下面是港澳资讯F10的页面复制样本:

☆最新提示☆ ◇600307 酒钢宏兴 更新日期：2011-03-02◇ 港澳资讯 灵通V5.0
☆【港澳资讯】所载文章、数据仅供参考，使用前务请仔细核实，风险自负。☆
★本栏包括【1.最新提醒】【2.最新报道】【3.最新异动】【4.最新运作】【5.大宗交易】
【1.最新提醒】
【港澳资讯 股票市场关注度】
统计时间：2011-03-02
600307酒钢宏兴 在所有A股(2125支)中市场关注度排名第1183位
较前日上升1位    关注度等级：★★★
说明：关注度是基于机构研究报告以及各大财经网站个股关注数据经过计算得出。

【最新简要】
┌─────────┬────┬────┬────┬────┬────┐
｜★最新主要指标★  ｜10-12-31｜10-09-30｜10-06-30｜10-03-31｜09-12-31｜
｜每股收益(元)      ｜0.4592  ｜0.4083  ｜0.1992  ｜0.0800  ｜0.1569  ｜
｜每股净资产(元)    ｜5.2400  ｜5.1700  ｜5.0500  ｜4.9200  ｜4.8300  ｜
｜净资产收益率(％)  ｜8.7691  ｜7.8931  ｜3.9467  ｜1.6700  ｜3.2471  ｜
｜总股本(亿股)      ｜20.4568 ｜20.4568 ｜20.4568 ｜20.4568 ｜20.4568 ｜
｜流通A股(亿股)     ｜8.7360  ｜8.7360  ｜8.7360  ｜8.7360  ｜8.7360  ｜
｜有限shou条件股份(亿 ｜11.7208 ｜11.7208 ｜11.7208 ｜11.7208 ｜11.7208 ｜
｜股)               ｜        ｜        ｜        ｜        ｜        ｜
├─────────┴────┴────┴────┴────┴────┤
｜★最新公告:01-28刊登临时股东大会决议公告(详见后)                    ｜
｜★最新报道:01-25业绩大增分配慷慨 酒钢宏兴(600307)推出10转10派1方案( ｜
｜详见后)                                                             ｜
├──────────────────────────────────┤
｜★最新分红扩股和未来事项:                                           ｜
｜【分红】2010年度 10转10派1(含税)(预案)                              ｜
｜【分红】2010中期 中期利润不分配(决案)                               ｜
｜【分红】2009年度 10派1(含税)(实施) 股权登记日:2010-07-02 除权除息日:｜
｜2010-07-05                                                          ｜
｜【增发】 2010年度拟非公开发行不超过1086000000.00股,发行不低于8.84元(｜
｜待批) 增发对象：不超过十名特定投资者                                ｜
├──────────────────────────────────┤
｜★特别提醒：                                                        ｜
｜★限shou股上市(2012-10-30)：117207.87万股                             ｜
├──────────────────────────────────┤
｜10-12-31 每股资本公积: 2.366 主营收入(万元):3952450.74同比增9.94%   ｜
｜10-12-31 每股未分利润: 1.380   净利润(万元):  93943.48同比增192.74% ｜
└──────────────────────────────────┘


公式源码：
w:=F10FIND('☆最新提示☆ ◇',1);
W1:=F10FIND('｜★最新分红扩股和未来事项:',w);
W2:=F10FIND('｜【分红】',w1);
W3:=F10FIND('｜',w2);
za:=F10TEXT(w2,w3-w2);
W4:=F10FIND('｜【增发',w1);
W5:=F10FIND('├────────────────',w4);
zb:=F10TEXT(w4,w5-w4);
Z:=za+'\n'+zb;
<%
Z=FFL.VarData("z")
z=Replace(z," ","")
z=Replace(z,"｜","")
z=Replace(z,vbCrlf,"")
FFL.VarData("z")=z
%>
DRAWTEXTEX(1,0,3,-3,z);

我没有港澳F10数据，能提供测试图的朋友，上图

[url=http://www.70822.com/soft/sort013/sort02/down-31505.html]F10公式[/url]