| ■ Enterキーで次のコントロールにフォーカスを移す |
| ユーザが汎用機からの移行の場合、希望が多いですね | |
| 画面によっては、マスクが発生するので SetFocus はお勧めできません (たぶん、面倒でしょう) | |
| Windowsになってからは一般的にフォーカスを遷移させることはなくなってきたのですが | |
| どうしても要望が強い場合には以下の方法を取るといいでしょう | |
| しっかりチェックしていないので、不具合が発生するかも知れません (誤動作があれば連絡ください...) |
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
' Enterキーが押された場合
If KeyCode = vbKeyReturn Then
' フォーカスを次のコントロールに移動する
Text1.Enabled = False
Text1.Enabled = True
End If
End Sub
|