当前位置：主页 >股票 >指标公式 >
5、执行完循环后，我们需要的所有运算都完成了，接着要做的是把VBS中的结果送回到飞狐公式系统中。 ffl.vardata("spj")=vspj--按字面上通俗理解，本行意思是通过接口ffl.vardata()，让飞狐公式系统中的序列变量spj等于vbs中的数组vspj，即VBS中的数据传递到飞狐公式系统。 6、飞狐公式系统输出spj，注意此时的spj已经不等于原来的序列收盘价了。 通过以上解释，你明白了吗？可以实际动手操作了，不过别急，由于飞狐的VBS尚存在BUG，上述代码运行时会出现非法操作，问题出在vspj(i)=vspj(i)*1.1，直接乘以1.1有问题，待以后飞狐完善后就没问题啦，目前需把代码稍作修改，如下： spj:=close; n=1.1; <% vspj=ffl.vardata("spj") '下面一行，把公式系统中的常量n传到VBS中的变量vn vn=ffl.vardata("n") last=ubound(vspj) for i=0 to last vspj(i)=vspj(i)*vn next ffl.vardata("spj")=vspj %> vspj 上述代码中，有一行以半角单引号“'”开始的VBS注释语句，注释语句不会被执行，仅起注解代码的作用。编写公式时，应养成在适当代码处，插入注释语句的良好习惯。以免将来自己也看不懂代码，更谈不上修改、改进公式代码。 现在开始动手输入并建立以上公式。在飞狐的界面中按Shift+W，调出管理面板，鼠标点正文的“公式”，股市马经 http://www.goomj.com收集整理调 出公式管理面板，鼠标右击“技术指标”，建一个新的公式组“VBS学习”，然后鼠标右击“VBS学习”新建一个公式，公式名称“VBS公式1”，然后逐行 输入上述公式代码，不要偷懒哟（来个“复制”、“粘贴”最轻松了，但学完就忘），一行一行的从键盘输入，校对无误后，点“确定”保存公式，随便调一个股票 的K线，然后键盘输入vbs即从键盘精灵中发现刚才的公式名称，选中它，就可看到你的公式输出的曲线。 练习： 1、用vbs设计一个公式，输出收盘价相对应的跌停价位。 2、用vbs设计一个公式，计算每日的换手率，提示：利用公式系统中的流通盘函数CAPITAL或FINANCE(N)，注意这两个函数的单位不同。 （阅读次数：）
