初级问题：类型转换出现错误。devison by zero?(50分)

AccessXp+bcb6，数据庫中有一个单精度型字段profit,计算每年profit的增长率（单精度型）：
...
if ( Table2->FieldValues["Profit"] >0.1) //上年度
增长率 = （本年profit－上年度profit）/上年度profit　
....
运行时提示错误："devison by zero"。
改成　　if ( Table2->FieldValues["Profit"] >1) 时没出现提示。
请问各位怎么办？？？

各乘上10再做运算吧。[]

肯定有除0，在除法前判断上年度是否为0！