Select * From settle_accu Where ym=(Val(Thisform.combo2.Value))*100+Val(Thisform.combo3.Value)-1 Into Cursor temp1 Readwrite
Select * From settle_accu Where ym=(Val(Thisform.combo2.Value))*100+Val(Thisform.combo3.Value) Into Cursor temp2 Readwrite

Select accu,Sum(qty) As qty,io From bill Where Substr(Dtos(Date),1,6)=Alltrim(Thisform.combo2.Value)+Alltrim(Thisform.combo3.Value) Group By accu,io Into Cursor tmp1 Readwrite

SELECT tmp1
Locate FOR Alltrim(tmp1.accu)==Alltrim(temp1.accu) AND ALLTRIM(tmp1.accu)==ALLTRIM(temp2.accu) And Alltrim(tmp1.io)=="I"

If Found()
Replace temp2.inttl WITH temp1.inttl+tmp1.qty
endif
为什么我Temp2.inttl的结果前面总是多个10?(inttl是数值型n(11,2),如果我的inttl是373617.31,但它显示的是10373617.31),这是什么原因呢?而且没有规律的.有时显示正确,但有时前面不是多个1就是10???

temp1临时表是找到上月的inttl数,temp2临时表是找到这个月的inttl数.tmp1是找到这个月的"I"的数,tmp1.qty+temp1.inttl算得temp2.inttl  所以要replace表temp2的inttl值.."O"也类似."I,O"表示进出..

如果是 Sum(qty) As qty导致的,有什么办法可以解决呢?

是啊..银行日记账啊..我这人没什么,就是死版了点.想好一种方法就想不出另一种方法了..怎么做啊?

我查得文本框text1的值为上月的qty,我想对于表A字段账号、日期、支出，收入，加多一个字段余额。表A已存在多个记录。请问如何结算余额。我知是thisform.text1.value+收入-支出算得，把这个算得的值放回到text1中，接着算第二条记录。则要使用循环，要怎么做呢？我试了好多次都不行啊。。只能求助了。可能我写错了，不敢贴上代码了。