White Rectangle on Form After Repaint

S

Sprinks

In a command button on click event procedure, I do the following:

DoCmd.SetWarnings False

' Run a series of queries
stDocName = "ResetTimesheet"
DoCmd.OpenQuery stDocName, acNormal, acEdit

Me.Repaint
MsgBox "Posting complete." & vbCRLF & "Timesheet reinitialized."

DoCmd.SetWarnings True

When the MsgBox appears, a section of the screen, which appears to
correspond to the area of the first subform's header section, appears white.

Can anyone tell me how to preserve the screen?

Sprinks
 
Top