Calculated fields

[graciemora]

Hi, I have a form, and I added a calculated field, but when I Try to sum the total It just give me the options to count/None, My quantity field is number data type and my price field is number data type also. What I am doing wrong?


thanks for your help

[maximus]

Well I guess you have a tabular form with two rows quantity and prices you have a unbound text box with that multiplies the value in this two rows and now u want to find the total of all the unbound text boxes.

I have a table with two Fields A and B which are number Feild. I have a A tabular form with an unbound text box which displays the A*B.

I have written this Function that will help me to display the sum:

Option Compare Database
Dim intTotal As Integer
Dim intmultiply As Integer
Function MyTotal() As Integer
Set rst = CurrentDb.OpenRecordset("Table5")
Do While Not rst.EOF
intmultiply = rst!c * rst!b
intTotal = intTotal + intmultiply
intmultiply = 0
rst.MoveNext
Loop
rst.Close
Set rst = Nothing
MyTotal = intTotal
intTotal = 0
End Function

Check Form5 attached with this post. The code is in the standard module 1 and there is a code attached to the on current event of the form:

Me.Text13 = MyTotal()

This code ensures that the total is Displayed.

if this solves your problem mark this thread solved.