Remove "Run Query" from Status Bar

[VBA Coder]

Does anyone know how I can remove the "Run Query" message
that appears in the Status Bar when I run an action
query? I am trying to add my own message to the Status
Bar when I run a bunch of queries, however, each time an
Action Query is run, my message gets overwritten by the
generic Access message "Run Query", for instance. My
sample code is below. I would like to put a message
before I run each query, that way the user knows where we
are in the process:

vReturn = SysCmd(acSysCmdSetStatus, "Step 1 of 5...")
DoCmd.OpenQuery "qryNumber1", acViewNormal, acEdit