回答内容

その対応策としては、郵便番号を入力すると自動的に住所のテキストボックスにフォーカスが移動し、かつ都道府県・市町村名の次にカーソルが移動し、直ちに番地入力が可能な状態にする方法を紹介します。　　それには、郵便番号テキストボックスの「AfterUpdate／更新後処理」イベントプロシージャに、次のようなコードを記述します。　　Private Sub 郵便番号_AfterUpdate() 　　With Me!住所 　　'住所にフォーカスを移動 　　 .SetFocus 　　 'カーソルを最後に移動 　　 .SelStart = Len(.Value) 　　End With 　　End Sub 　　このフォームを開き、郵便番号を入力してEnterキーを押すと、直ちに番地入力可能な状態になります。

回答館・回答団体

岡山県産業振興財団