請問Access計算公式問題？

Question

問題1.
我在資料表的地方，有個欄位名稱為『台幣小計』
我要在『台幣小計』欄位裡設一個公式為：
([本息]+[收購數]+[轉出數])*價碼

請問公式要打在哪裡。這樣的輸寫方式對嗎？



問題2
我在資料表的地方，有個欄位名稱為『點數結存』
我要在『點數結存』欄位裡設一個公式為：
[本息]+[收購數]-[轉出數]+上一筆資料的點數結存

請問我該怎麼設公式。要設在哪邊？？

pop大大：

請問你4.1裡的公式要打在表單A資料表的哪邊？？@@

POP大大：
請問是打在程式碼裡嗎？
我把你的程式貼上。
但是回到表單裡看。
一樣沒有運算結果出來捏@@

POP大大：
我剛剛輸入想說要不把程式貼上後
再輸入一筆新的資料看會不會有運算結果出來
結果，他出現『編譯錯誤：使用都自定型態尚未定義』這個對話方塊耶@@
哪裡有問題嗎？
他把第一行的程式用黃色選都來Private Sub Form_BeforeUpdate(Cancel As Integer)
然後第三行的程式用藍色選起來sp As DAO.Recordset

POP大大：
http://rebecca-cat.myweb.hinet.net/Richeasygold.mdb

↑↑↑↑↑↑↑↑↑↑↑↑↑↑
這是我的檔案
可否幫我看一看哪裡出了問題呢！？
因為我本身資料欄位裡就已經有『項目』這個欄位是『自動編號』的了
所以我就沒有再增加一個『A編號』的欄位了
並且我在程式裡的『A編號』也改成『項目』了
所以我不曉得哪裡出了問題？！
可否幫我看看呢！？
我的mail是：[e-mail]

Answer 1

1: Access 的資料表無法作到你的要求.
2:設定的條件在表單.
3:為了達到問題(2)的要求.
請在資料表多設一個_A編號_的欄位_資料類型設定_自動編號
4:到你設計作業的表單:
4.1:假設沒有子表單的情況.原資料表名稱假設_ A資料表
Private Sub Form_BeforeUpdate(Cancel As Integer)
ME!台幣小計=(NZ(ME![本息])+NZ(ME![收購數])+NZ(ME![轉出數]))*NZ(ME![價碼])
Dim sp As DAO.Recordset
Set sp = CurrentDb.OpenRecordset("select * from A資料表 order by A編號 asc ;")
If sp.RecordCount > 0 then
sp.MoveLast
sk=sp("點數結存")
End If
Me!點數結存=ME![本息]+ME![收購數]-ME![轉出數]+sk
End Sub
4.2:若是子表單.則將上述轉到子表單.
PS:請自行更新 A資料表 為你原有的資料表名稱.

2006-12-15 22:12:34 補充：
我有試過以上程序.結果是ok的.
1:我現另外假設你表單的欄位順序是
本息_收購數_轉出數_價碼
在價碼 (也就是你實際這4個欄位順序的最後一個欄位)
的 AfterUpdate_貼上
ME!台幣小計=(NZ(ME![本息]) NZ(ME![收購數]) NZ(ME![轉出數]))*NZ(ME![價碼])
2:在_本息_收購數_轉出數 順序的最末一個欄位的AfterUpdate_貼上

2006-12-15 22:16:34 補充：
Dim sp As DAO.Recordset
Set sp = CurrentDb.OpenRecordset("select * from A資料表 order by A編號 asc ;")
If sp.RecordCount > 0 then
sp.MoveLast
sk=sp("點數結存")
End If
Me!點數結存=ME![本息] ME![收購數]-ME![轉出數] sk
ps:請在資料表多設一個_A編號_的欄位_資料類型設定_自動編號
第1忘了寫 請自行補上.

2006-12-15 22:25:26 補充：
sorry!上段忘了 .請使用第一次的程序(只是分開而已)
請問(1)你每筆紀錄
本息_收購數_轉出數_價碼
收購數_轉出數 是否都有固定輸入資料 .
這牽涉到程序的執行.

2006-12-15 22:30:08 補充：
ps:我用現有的欄位作了一個資料檔.只是不知要如何寄給你參考?
若你須要.可使用寄信的方式.告知如何傳檔給你的方式.