Function 累計(対象項目) As Currency
 累計金額 = 累計金額 + 対象項目
 累計 = 累計金額
End Function
---------------------
累計金額 = 0
SQL Update Q_現金出納帳 Set 残高 = 累計(入金 ? 出金) order by 年月日,ID