数時間、このコードが機能することがわかりました。
If KeyCode = 37 Then
Me.Text12.SetFocus
End If
その後、不思議なことに機能しなくなりました。OnEnter サブルーチンの処理に何か関係があるのではないかと考えました (カーソルをテキスト フィールドの末尾に移動します)。
ただし、OnEnter サブルーチンを編集しても役に立ちませんでした。他に行ったことは、入力/キーボードの言語を変更することだけでした (引用符を入力して、すぐに表示できるようにするためです。ハザー!)。
私は今、このコードを持っています:
On Error Resume Next
If KeyCode = 37 Then
Me.Text12.SetFocus
Me.Text12.SetFocus
End If
これは機能します。したがって、非表示、無効、非表示、牧師とのお茶などに関連する SetFocus が機能しないという 50 ページ以上の検索結果がここには当てはまらないことを私は知っています。
また、最初にフォーカスを別のコントロールに設定しようとしましたが、DoEvents も自由に適用しましたが、どちらも役に立ちませんでした。
誰かが似たようなことに遭遇したことがありますか、それともこれは本当に奇妙なハイゼンバグですか?