473,419 Members | 1,633 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,419 software developers and data experts.

SysCmd

Hi Folk

I have the following nifty little function that I can call to put messages
on the status bar. However, I don't know how to clear it and show the
normal messages (e.g. in a control on a form Statusbartxt)

Public Function SysMs(S As String)
On Error GoTo er
'-
Dim V As Variant
'-
S = S & " "
If S = " " Then
''clear all - this is what I do not know...
Else
V = SysCmd(acSysCmdSetStatus, S)
End If
xt:
Exit Function
er:
Resume xt
End Function

TIA

nicolaas
Nov 13 '05 #1
3 5864
Call SysCmd(acSysCmdRemoveMeter)

By the way, rather then using
V = SysCmd(acSysCmdSetStatus, S)

Try:

Call SysCmd(acSysCmdSetStatus, S)

If you're not going to do anything with the V variable, there's not a
good done in calling and using it. (No harm either, but.... What's
the point of having it?)

Nov 13 '05 #2
Br
Chuck Grimsby <c.*******@worldnet.att.net> wrote:
Call SysCmd(acSysCmdRemoveMeter)

By the way, rather then using
V = SysCmd(acSysCmdSetStatus, S)

Try:

Call SysCmd(acSysCmdSetStatus, S)

If you're not going to do anything with the V variable, there's not a
good done in calling and using it. (No harm either, but.... What's
the point of having it?)


or

SysCmd acSysCmdSetStatus, S

?

:)
--
regards,

Bradley

A Christian Response
http://www.pastornet.net.au/response
Nov 13 '05 #3
Br@dley wrote:
Chuck Grimsby <c.*******@worldnet.att.net> wrote:
Call SysCmd(acSysCmdRemoveMeter)

By the way, rather then using
V = SysCmd(acSysCmdSetStatus, S)

Try:

Call SysCmd(acSysCmdSetStatus, S)

If you're not going to do anything with the V variable, there's not a
good done in calling and using it. (No harm either, but.... What's
the point of having it?)


or

SysCmd acSysCmdSetStatus, S

all of that worked rather well. thank you.
Nov 13 '05 #4

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

13
by: Andrew | last post by:
I use conditional compiler constants, set through the VBA IDE in Tools, <projectname> Properties, that I refer to throughout my code to control which code is used during development, and which...
13
by: Mike MacSween | last post by:
I'm doing this: strAccessPath = SysCmd(acSysCmdAccessDir) & "msaccess.exe" in a vb executable to do what it looks like. If I remove the reference to the access object library this seems to...
1
by: MLH | last post by:
Here's what I copied from A97 Help... Call the SysCmd function with the acSysCmdGetObjectState action argument and the objecttype and objectname arguments to return the state of a specified...
3
by: paii, Ron | last post by:
I use SysCmd to show progress of functions ' Show the progress meter s = SysCmd(acSysCmdInitMeter, "Process Run " & Count & " Step", Count) For i = 0 To Count - 1 ' Do something ' Update...
8
by: BillCo | last post by:
I'm updating a legacy app with table naming that makes baby jesus cry. It's a bit of a spider web though... no telling when and where the tables will be called by name. So I wrote this for renaming...
30
by: Mikael | last post by:
I am using Access 2003. I would like to use BLOB to display an image on a form. I have referred to the kb article: http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q103257& But the code...
5
by: bobh | last post by:
Hi All, This should be simple enough but I'm not getting it working for some reason so, what's the code and in what events In AccessXP on a form when a user clicks on a button(btnGetData) I...
0
ADezii
by: ADezii | last post by:
In Tip #12, we showed how to display a Progress Meter within Access by using the SysCmd() Function. By using this same Function, with different Action Arguments, we will now demonstrate how you can...
2
by: Dedalus | last post by:
If I want to retrieve a full version information for an ms access databases, I use (from vb6 code) the "Access.Application" object and SysCmd method. Whit the number returned by the method I can...
0
by: emmanuelkatto | last post by:
Hi All, I am Emmanuel katto from Uganda. I want to ask what challenges you've faced while migrating a website to cloud. Please let me know. Thanks! Emmanuel
0
BarryA
by: BarryA | last post by:
What are the essential steps and strategies outlined in the Data Structures and Algorithms (DSA) roadmap for aspiring data scientists? How can individuals effectively utilize this roadmap to progress...
1
by: nemocccc | last post by:
hello, everyone, I want to develop a software for my android phone for daily needs, any suggestions?
0
by: Hystou | last post by:
There are some requirements for setting up RAID: 1. The motherboard and BIOS support RAID configuration. 2. The motherboard has 2 or more available SATA protocol SSD/HDD slots (including MSATA, M.2...
0
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...
1
by: Hystou | last post by:
Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows...
0
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each...
0
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing,...
0
by: conductexam | last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.