アクティブなテキストボックスの名前を返すには？

とりとん 2006-05-04 08:06:24 No: 95263

ＶＢ初心者です。以前ここの掲示板でソフトキーボードの作り方がありました、Private Sub Command1_Click(Index As Integer)
Text1.SelText = CStr(Index)

しかし、これでの入力は、text１のボックスしかできず困っています。フォームの数箇所のテキストボックスでカーソルのあるテキストボックスに入力できるようにしたいのですが、どなたかお教えいただけないでしょうか。

Dental 2006-05-04 08:53:10 No: 95264

アクティブなコントロール自体は、ActiveControlプロパティで取得できます。
でも、CommandButtonを使用しているのであれば、ボタンをクリックした時点で、
フォーカスがボタン側に遷移しちゃいますから、その時点で調べようとしても、
最早手遅れでしょう。フォーカス系のイベントを使って、フォーカスのあった
テキストボックスを追跡するようなコードを書いてみてはどうですか?