テキストボックスへの入力について

いつもお世話になっております。

フォーム上のテキストボックスへの入力がちょっと手間なので、
コード(数値部分)のみ入力したら頭部分は自動で決まって文字を
表示することができる方法がありましたら、ご教授お願いいたします。

Ms Access2013を使用しています。

【例】
社員コードの設定　F000000 頭一桁目に"F"が付き残りは６桁の数字となっています。
たとえば、社員コードが123と入力すると⇒⇒F000123と変換(表示)できるように
することは可能でしょうか。

よろしくお願いいたします。

No.1 ベストアンサー 回答者： bonaron 回答日時： 2017/12/26 12:36

こんな感じですかね？

Private Sub テキスト1_AfterUpdate()
　　If IsNumeric(ActiveControl) Then
　　　　ActiveControl = Format(ActiveControl, "\F000000")
　　End If
End Sub

この回答へのお礼

bonaronさん

　ご教授ありがとうございます。
　さっそく、頂いた通りに転記して使用させていただきました。
　うまく希望通りに表示されました。
　
　本当にありがとうございました。

お礼日時：2017/12/26 13:18