谈不上指点。我只是凭第一感觉，没有实测你的程序，你可以用调试窗口一条条运行代码，然后在监视窗口把几个重点变量监控一下，观察它们值的变化是否符合你的预期。另外，你第一句中的“Interger”写错了，整型的英语是“Integer”。

看清楚了，VFP没那么容易溢出：

谢谢您的指导。没有注意的位数的问题。真是太感谢了
你说得对，就是想搞复杂点，可是玩过火了。

如果对溢出的现象不清楚，参考一下置顶描红那个帖子。

谢谢，太心焦了弄错了。虽然您 没有试，但您一说到值的问题，我马上想到问题可能出什么地方，对我有启发！

同意版主的说法。运行了一下，我这儿错误出在str(),没有规定返回长度，数值串长度溢出，newstr=alltrim(str(newserial))就是这儿的隐患错误，数值串长度如果默认限定又没有另行规定长度时，溢出。

要取得数值（不管是整数还是浮点数）的字符串，使用TRANSFORM()函数即可，不用绕来绕去，因为VFP内部所有数值型数据都是以字符串储存的，哪怕是超出2^32的整数，只要在赋值时在后面加个.0作为浮点数，VFP就把它视为64位的数据储存，然而在内部字符串中，它却是没有.0的，即完完整整的比2^32还长的长整数形式，用TRANSFORM()把这个内部形式反馈出来就是了。

记住：TRANSFORM()函数返回的是数据的内部形式，即最原始的形式。

[ 本帖最后由 TonyDeng 于 2013-8-15 13:30 编辑 ]

昨天我在逐条测试的时候，发觉那个 地方有问题，不知道为什么 。
vfp说明很早的时候看过，现在基本上是用到哪儿看哪儿。我只有6.0的说明，在str()中没有提到位数的问题，所以也就忽略了。您一行行给我演示，再次感谢。

newstr,全是******，