主题：EXTGBDATA的使用问题

代码运行一次就会加一次，你一个K上代码的执行不止一次的，分笔来了就执行一次作为最新计算结果。所以才会这样。

稍迟点我写个范例给你。

bars:EXTGBDATA('bars');

IF c>o and bars<BARPOS THEN
 BEGIN
 NN:= EXTGBDATA( 'QUANJU');
 NN:= NN + 1;
 EXTGBDATASET( 'QUANJU',NN );
 EXTGBDATASET('bars',BARPOS);
END

NN1: EXTGBDATA( 'QUANJU'),NODRAW;

需要再添加一个全局变量进行控制才行。你参考样例修改你的那个代码即可。