VB ビジュアル編 (その八) その他関数 sendkeys、setfocus、IMEStatus ■MousePointer オブジェクトのマウスポインタを砂時計などに変更する。 '** マウスポインタ定数宣言 Public Const CUR_WAIT = 11 Public Const CUR_RESET = 0 '** マウスポインタ砂時計セット form1.MousePointer = CUR_WAIT '** マウスポインタリセット form1.MousePointer = CUR_RESET ■Me 現在のオブジェクトを示します。 unload form1 とする代わりに unload Me とするとこができます。 ■プリンタ設定ダイアログ(プリンタ制御、印刷ダイアログ) '** メソッド CommonDialog1.ShowPrinter 'ダイアログ表示 '** プロパテ