I currently have an Access Database which I use for testing results - In this database there is a form that has fields that calulate result. An example of Average is below
Private Sub IBAve_Enter()
On Error Resume Next
'Declare local variables
Dim result As Double, count as Intger, x As Integer, CTLR as Control
Set CTLR = ME!IBAve
If ME("IB" &(x)) >0 Then
result = result + ME ("IB" & (x))
count = count +1
End if
Next x
If count = 0 Then result = 0 Else result = result / count
CTLR = Result
End Sub
What I need is the same thing for using StdDev
I really need the whole thing because It can't get it to work.
Thanks
Private Sub IBAve_Enter()
On Error Resume Next
'Declare local variables
Dim result As Double, count as Intger, x As Integer, CTLR as Control
Set CTLR = ME!IBAve
If ME("IB" &(x)) >0 Then
result = result + ME ("IB" & (x))
count = count +1
End if
Next x
If count = 0 Then result = 0 Else result = result / count
CTLR = Result
End Sub
What I need is the same thing for using StdDev
I really need the whole thing because It can't get it to work.
Thanks