Status Bar - Getting the message to appear

  • Thread starter Thread starter Haas
  • Start date Start date
H

Haas

I have a data entry form with forty or so fields that are
all identified as to what is expected and the message
appears on the status bar for each. Problem is a calendar
popup form that I installed on the form to fill a date
field. When used, it fills the field and disappears just
fine. But then, all the messages that should be in the
status bar text disappear and "Ready" is all that appears.
Adding Refresh button to the form did nothing. Form must
be exited and reentered to make the messages appear again.
How do I handle this?
 
Try:
Docmd.Echo True, "My message"

If that disappears too quickly, try:
SysCmd(acSysCmdSetStatus, "My message")
 
Okay, what field and what property do I add this to? ALL
the fields show "Ready" on the Status Bar text after I
return to the form from the calendar. Also, I tried one
and got a syntax error as there seems to be parentheses
needed and [ ] too. By "My Message" do you mean the status
bar text that I entered on the table? Hopefully I do not
have to add that to all the fields again just to solve this
issue. Thanks JMH
 
Perhaps the status bar is not reset correctly after the calendar control is
used, but it should pick up again as soon as the focus moves to the next
field?

To pick up the text from the active control of the form and place into the
status bar, try:
SysCmd(acSysCmdSetStatus, Screen.ActiveControl.StatusBarText

If the entire thing stops working after using the calendar, use a different
calendar. There's a free one that is just a simple Access for in this link:
http://members.iinet.net.au/~allenbrowne/ser-51.html

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Okay, what field and what property do I add this to? ALL
the fields show "Ready" on the Status Bar text after I
return to the form from the calendar. Also, I tried one
and got a syntax error as there seems to be parentheses
needed and [ ] too. By "My Message" do you mean the status
bar text that I entered on the table? Hopefully I do not
have to add that to all the fields again just to solve this
issue. Thanks JMH
-----Original Message-----
Try:
Docmd.Echo True, "My message"

If that disappears too quickly, try:
SysCmd(acSysCmdSetStatus, "My message")
Click to expand...
Click to expand...
 
I tried entering the SysCmd exactly as shown into the On
Close property for the Calendar, but something was missing
- I tried a closed parenthesis and then it wanted some
equal sign = in an expected argument. Please help - was
that the correct place to put that and what is the correct
phrase?
Thanks
-----Original Message-----
Perhaps the status bar is not reset correctly after the calendar control is
used, but it should pick up again as soon as the focus moves to the next
field?

To pick up the text from the active control of the form and place into the
status bar, try:
SysCmd(acSysCmdSetStatus, Screen.ActiveControl.StatusBarText

If the entire thing stops working after using the calendar, use a different
calendar. There's a free one that is just a simple Access for in this link:
http://members.iinet.net.au/~allenbrowne/ser-51.html

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Okay, what field and what property do I add this to? ALL
the fields show "Ready" on the Status Bar text after I
return to the form from the calendar. Also, I tried one
and got a syntax error as there seems to be parentheses
needed and [ ] too. By "My Message" do you mean the status
bar text that I entered on the table? Hopefully I do not
have to add that to all the fields again just to solve this
issue. Thanks JMH
-----Original Message-----
Try:
Docmd.Echo True, "My message"

If that disappears too quickly, try:
SysCmd(acSysCmdSetStatus, "My message")


I have a data entry form with forty or so fields that are
all identified as to what is expected and the message
appears on the status bar for each. Problem is a calendar
popup form that I installed on the form to fill a date
field. When used, it fills the field and disappears just
fine. But then, all the messages that should be in the
status bar text disappear and "Ready" is all that appears.
Adding Refresh button to the form did nothing. Form must
be exited and reentered to make the messages appear again.
How do I handle this?
Click to expand...
Click to expand...


.
Click to expand...
 
The SysCmd() is a function call. You can test if by opening the Immediate
Window (Ctrl+G), and typing this:
? SysCmd(acSysCmdSetStatus, "Test message")
Press Enter at the end of that line, and you should see it in the Status
bar.

To use that in code, you need to set the property to:
[Event Procedure]

Click the Build button (...) beside this.
Access opens a code window.

Between the "Private Sub..." and "End Sub" lines, try:
Call SysCmd(acSysCmdSetStatus, "Test message")

To use it with Screen.ActiveControl.StatusBarText, try putting it into the
Activate event of the form. That's the one that should fire when focus
returns to your original form (i.e. after your popup calendar closes).


--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Haas said:
I tried entering the SysCmd exactly as shown into the On
Close property for the Calendar, but something was missing
- I tried a closed parenthesis and then it wanted some
equal sign = in an expected argument. Please help - was
that the correct place to put that and what is the correct
phrase?
Thanks
-----Original Message-----
Perhaps the status bar is not reset correctly after the calendar control is
used, but it should pick up again as soon as the focus moves to the next
field?

To pick up the text from the active control of the form and place into the
status bar, try:
SysCmd(acSysCmdSetStatus, Screen.ActiveControl.StatusBarText

If the entire thing stops working after using the calendar, use a different
calendar. There's a free one that is just a simple Access for in this link:
http://members.iinet.net.au/~allenbrowne/ser-51.html

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Okay, what field and what property do I add this to? ALL
the fields show "Ready" on the Status Bar text after I
return to the form from the calendar. Also, I tried one
and got a syntax error as there seems to be parentheses
needed and [ ] too. By "My Message" do you mean the status
bar text that I entered on the table? Hopefully I do not
have to add that to all the fields again just to solve this
issue. Thanks JMH
-----Original Message-----
Try:
Docmd.Echo True, "My message"

If that disappears too quickly, try:
SysCmd(acSysCmdSetStatus, "My message")


I have a data entry form with forty or so fields that are
all identified as to what is expected and the message
appears on the status bar for each. Problem is a calendar
popup form that I installed on the form to fill a date
field. When used, it fills the field and disappears just
fine. But then, all the messages that should be in the
status bar text disappear and "Ready" is all that appears.
Adding Refresh button to the form did nothing. Form must
be exited and reentered to make the messages appear again.
How do I handle this?
Click to expand...
Click to expand...
Click to expand...
 
Back
Top