> 再現できる最低限のコードを提示してくれると、確かめようがあるんですが。 > (特殊なOCX使ってると、こっちではチェックできないけど)
コードではなく、MaxLengthが絡むと駄目なようです。 試したのは以下のコードです。 ROFM上にTextBoxとボタンを配置します。 TextBoxの方のMaxLenght=5とし、「12345」→ENTERとすると 音が鳴った後にフォーカス遷移します。 MaxLengthはEnterも入力値とみなすんでしょうか?
Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = vbKeyReturn Then 'Enterだったら SendKeys "{TAB}" 'TABキーに置き換える KeyAscii = 0 '当イベント内でのEnterキー処理を終了させる End If End Sub
|