Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


464 / 2272 ツリー ←次へ | 前へ→

【11569】CreateObjectの後にマウスポインタがデフォルトに戻る ぽんぽん 10/4/2(金) 14:55 質問[未読]
【11570】Re:CreateObjectの後にマウスポインタがデ... ぽんぽん 10/4/2(金) 16:33 回答[未読]

【11569】CreateObjectの後にマウスポインタがデフ...
質問  ぽんぽん  - 10/4/2(金) 14:55 -

引用なし
パスワード
   【開発環境】
・Access2007
・WindowsXP

CreateObject("Access.Applicaction")を実行した後で、
砂時計にしていたマウスポインタが
デフォルトに戻ってしまうという現象があります。

-------------------------------------------------------------------

  〜処理(省略)〜

  Screen.MousePointer = ccHourglass

  〜処理(省略)〜

  Set acApp = CreateObject("Access.Application")
  ↑ここで砂時計がデフォルトに変わる
  acApp.OpenCurrentDatabase "C:\hoge\hoge.accdb"

  〜処理(省略)〜

  Screen.MousePointer = ccDefault

-------------------------------------------------------------------

CreateObjectの後に、
Screen.MousePointer = ccHourglass
を挿入してもデフォルトのままなのです。。。

ご存知の方、回避方法をご教授ください。

【11570】Re:CreateObjectの後にマウスポインタが...
回答  ぽんぽん  - 10/4/2(金) 16:33 -

引用なし
パスワード
   >CreateObject("Access.Applicaction")を実行した後で、
>砂時計にしていたマウスポインタが
>デフォルトに戻ってしまうという現象があります。

すみません、自己レスです。

CreateObjectを、GetObjectにしましたところ、
解決しました。

お騒がせ致しました。。。

464 / 2272 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
1078193
(SS)C-BOARD v3.8 is Free