画面制御等で使用するDoCmdメソッド
1 2 3 4 5 6 7 8 9 10 11 12 | With DoCmd .Echo False '画面の再描画をオフ .Hourglass True 'マウス ポインターを砂時計の画像に変更 .SetWarnings False 'システムメッセージの表示をオフ End With With DoCmd .Echo False '画面の再描画をオン .Hourglass False 'マウス ポインターを通常の表示に戻す .SetWarnings True 'システムメッセージの表示をオン End With |