設為首頁收藏本站Access中國

Office中國論壇/Access中國論壇

 找回密碼
 注冊

QQ登錄

只需一步,快速開始

access查詢設計余額計算例程

2002-5-6 01:50| 發(fā)布者: admin| 查看: 2076| 評論: 13|原作者: lwwvb|來自: www.mzhfr.cn

摘要: lwwvb版主的余額計算例程,非常不錯,值得下載 文件下載
一個余額計算例程,非常不錯,值得下載
可以動態(tài)地計算余額

f 是一個自定義函數(shù),原型如下,作用是為了計算當前日期的余額,其實這個實例也可以直接在窗體的Text控件里用DSUM函數(shù)實現(xiàn)的:
Public Function f(d As Date) As Currency
  Dim a As Currency
  Dim b As Currency
  a = Nz(DSum("[銀行存款]![存入]", "[銀行存款]", "[日期] <=  # " & d & "#"))
  b = Nz(DSum("[銀行存款]![提款]", "[銀行存款]", "[日期] <=  # " & d & "#"))
  f = a - b
End Function


發(fā)表評論

最新評論

引用 huanghai 2002-5-6 02:11
我已經(jīng)下載了,真的不錯。
引用 ui 2002-5-8 08:41
真極品,ACCESS真是什么都能做,版主的東東讓我對ACCESS有信心
引用 yuanhai 2002-5-29 00:07
好東西啊
引用 海棠花 2003-2-5 12:03
http://www.erpbus.net/access/topic.asp?topic_id=6930&forum_id=54

這是Access交流中心hung59直接在查詢中做的例子
引用 gxason 2003-4-3 07:24
我正在下載不知道好不好用??
引用 cg1 2003-4-6 18:59
http://temp.shtip.com.cn/web/index.asp?board=4&mode=3&recordid=254

也許你還有啟發(fā)
引用 哈瘌子 2003-4-10 21:05
以下是引用tmtony在2002-5-5 17:49:34的發(fā)言:
lwwvb版主的余額計算例程,非常不錯,值得下載
文件下載

能解釋一下 f   的作用嗎?
引用 marco2 2003-10-9 17:00
f 是一個自定義函數(shù),原型如下,作用是為了計算當前日期的余額,其實這個實例也可以直接在窗體的Text控件里用DSUM函數(shù)實現(xiàn)的:
Public Function f(d As Date) As Currency
  Dim a As Currency
  Dim b As Currency
  a = Nz(DSum("[銀行存款]![存入]", "[銀行存款]", "[日期] <=  # " & d & "#"))
  b = Nz(DSum("[銀行存款]![提款]", "[銀行存款]", "[日期] <=  # " & d & "#"))
  f = a - b
End Function
引用 nxjswt 2005-7-14 09:40
謝謝!!!!!!!!!!!
引用 cdwlove 2005-12-5 22:15
看帖不忘頂!!!!
引用 wf_xcb 2005-12-6 17:37
商榷!




這應作效率特差?====>>




    ====>>原因:每次打開查詢,都要基于表中的紀錄的順序逐條重新計算余額。假若基表中的紀錄達到萬條乃至幾十條,你試試要等待多長時間?




   =====>>解決方案:用靜態(tài)數(shù)據(jù),換取顯示速度,也就是要[將即時余額填入表的余額字段(最好不用Dsum函數(shù))]。




[em01]




引用 tonywang 2005-12-7 19:14
厲害,
引用 ljp518 2014-2-14 16:44
謝謝分享

查看全部評論(13)

QQ|站長郵箱|小黑屋|手機版|Office中國/Access中國 ( 粵ICP備10043721號-1 )  

GMT+8, 2025-7-17 05:50 , Processed in 0.096693 second(s), 23 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

返回頂部