Help with code

[bjreb]

When I run this code the form becomes blank after the form Frm_Change_cases is closed.

Private Sub CsQty_LostFocus()
Dim iResult As Integer

If iCaseHold = Me.CsQty.Value Then
Exit Sub
Else
DoCmd.OpenForm "Frm_Change_cases", acNormal, , , , acDialog, Me.CsQty.Value
End If
End Sub

Any Ideas?

Thanks
Andy

 

[mdlueck]

When I run this code the form becomes blank after the form Frm_Change_cases is closed.

What is the pointer the form pointing at?

Are you saying that the form named Frm_Change_cases opens, and when it closes, the caller form ends up blanking?

All fields on the caller form? Only the field this event is wired to?

How many other events do you have code/behavior attached to? Do you have code which is suppose to blank the form? Have you tried putting a breakpoint on such code to see if for some reason that code is getting executed, perhaps unexpectedly?

 

[bjreb]

At the moment the code is just opening the form Frm_Change_cases. The only code on the form is an openargs to populate a textbox. I tried using a message box on the parent form but it would blank out the form when the box was closed