在ACCESS子表單中的計算結果出錯

附件中的ACCESS檔案,在表單中計算出來的數據與實際相差甚遠.
檢查過很多次,都找不出哪裡出錯.
請各位高手指點一下.

testing.zip (31.31 KB)

樓主熱帖

aa7551

中學生 Rank: 2

帖子: 116
主題: 5
精華: 0
積分: 190
點名: 0
作業系統: xp
軟體版本: office 2002
閱讀權限: 20
性別: 男
來自: Taiwan
註冊時間: 2010-11-17
最後登錄: 2024-11-15

2^#

發表於 2011-2-21 09:41 | 只看該作者

大大不是很了解,所有數據都是輸入,沒有任何計算,能否再加說明

TOP

pcwh3

中學生 Rank: 2

帖子: 51
主題: 14
精華: 0
積分: 143
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2010-5-11
最後登錄: 2023-5-8

3^#

發表於 2011-2-21 22:13 | 只看該作者

回復 2# aa7551
當在子表單中輸入長、寬及高時，在最後輸入高的數字之後，便會觸動到afterupdate功能，此功能被設定呼叫一個巨集去計算其cbm，再將結果存入主表單中。
問題是，計算出來的結果出錯。
找了很久都找不出錯在哪裡，故此希望高手們幫忙一下，找出錯處，及如何去改寫程式。
謝謝。

TOP

aa7551

中學生 Rank: 2

帖子: 116
主題: 5
精華: 0
積分: 190
點名: 0
作業系統: xp
軟體版本: office 2002
閱讀權限: 20
性別: 男
來自: Taiwan
註冊時間: 2010-11-17
最後登錄: 2024-11-15

4^#

發表於 2011-2-22 15:06 | 只看該作者

大大的問題是否為 L:89,W:89,H:74,P:1 乘積為53.05,結果是錯誤
一.在Private Sub Pallet_AfterUpdate()
[outcbm] = Round(([Length] / 100) * ([Width] / 100) * ([Height] / 100) * [Pallet], 3)
Call outCBM_Auto_Update
End Sub
先確認這公式是否正確?([Length] / 100) * ([Width] / 100) * ([Height] / 100) * [Pallet]
二.小數點取幾位

TOP

aa7551

中學生 Rank: 2

帖子: 116
主題: 5
精華: 0
積分: 190
點名: 0
作業系統: xp
軟體版本: office 2002
閱讀權限: 20
性別: 男
來自: Taiwan
註冊時間: 2010-11-17
最後登錄: 2024-11-15

5^#

發表於 2011-2-22 15:53 | 只看該作者

[outcbm] = Round(([Length] / 100) * ([Width] / 100) * ([Height] / 100) * [Pallet], 3)
你可以試著去攔截width的值為8055,而使用me.width去求值剛好為8055,所以在此程式中只要去改欄名就好
width勿使用,其它的你自行修改

TOP

pcwh3