ms access 07 subform query

I have a main form with a tab control and a continuous subform on each of those tabs.
On the first continuous subform I have an account and dollar field that users can enter a dollar amount into.
Acct No, Dollar No
110, 10
119, 20
199, 30
There are several account#'s but the one I am focusing on is acct# 199.
On the second subform, it is setup the same as subform1, but the dollar fields are locked as we are just displaying values for them.
Acct No, Dollar No
210, 10
219, 20
299, 30

The acct# on the second subform I am focusing on is #299 and the dollar amount is a calculation based on the dollar amount from subform 1, where subform 1's acct # is 199

So, in the current_event of subform 2, I wrote:
If (Me.AcctNo = 299) Then
Dim calc As Long
calc = Nz(DLookup("[2009b]", "budgetinformation", "[DeptNo] = " & dept & " and [AcctNo] = 199 and ([2009b]>0 or [2009b] is not null)"), 0)
If (calc > 0) Then
Dim calc2 As Long
calc2 = calc * 0.14 + 7500
Me.[2009b].Value = calc2
Me.Info2.Value = "1"
Else
Me.[2009b].Value = 0
Me.Info2.Value = "1"
End If
End If

that all works great when the form initially loads.
However, it does not update after a user changes the value in subform1.
So, how do I call the subform2 current_event again after the user updates the subform1 amount - OR is there a better way or different location I should be doing this???