【Access】テキストボックスを入力不可にする

テキストボックスを入力不可にする方法ですが、いくつかやり方がありますのでパターンをまとめてみました。

使用可＆編集ロック有り

1 2 3 4 5 6 7 8 9

Private Sub Form_Load()       '使用可     Me.textName.Enabled = True           '編集ロック有     Me.textName.Locked = True       End Sub

テキストボックスにカーソルは移動できますが、入力出来ない状態です。

実行結果

使用不可＆編集ロック無し

1 2 3 4 5 6 7 8 9

Private Sub Form_Load()       '使用不可     Me.textName.Enabled = False           '編集ロック無し     Me.textName.Locked = False       End Sub

テキストボックスにカーソルが移動できません。背景色もグレーになっています。

実行結果

使用不可＆編集ロック有り

1 2 3 4 5 6 7 8 9

Private Sub Form_Load()       '使用不可     Me.textName.Enabled = False           '編集ロック有り     Me.textName.Locked = True       End Sub

こちらもテキストボックスにカーソルを移動できません。ただし今度は背景色が白になっています。

実行結果

スポンサーリンク

https://hosopro.blogspot.com/2017/12/access-vba-textbox-enable-locked.html 【Access】テキストボックスを入力不可にする