ステータスバーに表示と消去 ： Access

・Access画面のステータスバーに表示を行う

SysCmd acSysCmdSetStatus , 表示する文字列

スポンサーリンク

・ステータスバーの表示の消去

　SysCmd acSysCmdClearStatus
　この場合、何も表示されるのではなく、Accessのメッセージが表示されるようになります。
　何も表示されないクリアな状態にするには、SysCmd acSysCmdSetStatus , "　" を使います。

■ Access実行画面

「ステータスバーに表示」ボタンで実行します。
「ステータスバーをクリア」ボタンでAccessのメッセージが表示されます。

■ Access VBA 実行コード

Option Compare Database
Option Explicit

Private Sub コマンド0_Click()
    SysCmd acSysCmdSetStatus, "ステータスバーに表示"
End Sub

Private Sub コマンド5_Click()
    SysCmd acSysCmdClearStatus
End Sub