Microsoft Access modUi

From database24
Revision as of 13:40, 1 July 2010 by Dec (talk | contribs) (Created page with '=== setStatus === <syntaxhighlight lang="vb"> Public Sub setStatus(Optional strMessage As String = "Bereit") strMessage = _ getUserName & " - " & _ strMessage...')
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search

setStatus

Public Sub setStatus(Optional strMessage As String = "Bereit")
    strMessage = _
        getUserName & " - " & _
        strMessage
    SysCmd acSysCmdSetStatus, strMessage
End Sub