2012-10-07 34 views
0

我在連續窗體上的每個記錄的末尾有一個按鈕,它需要做:連續形式引用正確的信息

Private Sub Update_Click() 

Dim SellP As Double 
Dim BuyP As Double 
Dim Profit As Double 

SellP = DLookup(SellPrice, Flips, [Current]) 
BuyP = DLookup(BuyPrice, Flips, [Current]) 

Profit = SellP - BuyP 

Flips.Profit = Profit 

End Sub 

現在我知道這是不是正確的代碼,但我希望它能讓你知道它需要做什麼,主要是:

查找SalePrice,找到BuyPrice,從SalePrice中減去BuyPrice並使結果爲Profit,然後利用Profit來填充Profit字段..

謝謝!

回答

2

綁定表/查詢當前記錄的列可直接在代碼中使用。
您可以編寫例如 Profit = SalePrice - BuyPrice如果這些字段都是綁定數據的一部分。
你可能會在隨後兩個SalePrice-和BuyPrice,文本框的「更新後」 - 活動移動這個代碼,也許是這樣的:

If IsNull(salePrice) Or IsNull(buyPrice) Then 
    Profit = 0 
Else 
    Profit = salePrice - buyPrice 
End If 
+0

如何做,然後我輸入數據到數據表嗎?在我確定了實際的利潤之後。 –

+1

我在想你的連續表單有文本框綁定到那些用於輸入數據的字段。該表格應該用於數據輸入,而不是數據表直接。 – KekuSemau