Microsoft Access フォームをADOレコードセットに連結する方法 JP281998 をコマンドボタンで実行した場合にカーソルが消える？？？

Question

JP281998はForm Openのイベントで記述されていますが、

これを、コマンドボタンを配置して実行した場合

カーソルが消えてしまいます。

連結はされています。

テキストボックスにSetFocusさせているのですが、

そのテキストボックスフォーカス取得後のイベントで

Ｍｓｇｂｏｘ "OK!"

と記述するとメッセージボックスは表示されます。

なぜカーソルが消えてしまうのでしょうか？

また、カーソルを表示させるにはどのようにすればよいのでしょうか？

Ａｃｃｅｓｓ2007 accdb

Answer 1

こんばんは、MukkuMukuです。ナレッジが役にたてばなによりです。

とはいえ、どうにかならないものかと右往左往でVisibleプロパティを突っついたらうまくいいっちゃただけなんですね。

本質的な問題として何故こんなことになってしまうのだろうということには変わりがありません。

何かの時にでも役に立たない可能性はありありですが、

ExecuteComplete イベント（ADO）発生まで待機させるとフォーカスを見失う現象は回避できます。

この実装の必要があるかどうかは別問題として。

Answer 2

解決しました。

このフォーラムで検索したらＭｕｋｕＭｕｋｕさんのレスで

Me.Visible=False

Me.Visible=True

テキストボックス.Setfocus

で正常に動作しました＾＾；；

Answer 3

皆さん、こんにちは。

Microsoft Answers のご利用、ありがとうございます。

toc0229 さん、別のスレッドで MukkuMuku さんがコメントしてくれた方法でうまくいったということで、良かったですね。

こちらの質問を閲覧する皆さんにもこの手順を参考にしてもらえるよう、弊社 楠部 から toc0229 さんのコメントに「 回答としてマーク 」をさせていただきました。

「回答としてマーク」は質問者さんも登録、変更できます。

また何かありましたら、Answers をご利用ください。