テキストボックスを入力不可にする方法ですが、いくつかやり方がありますのでパターンをまとめてみました。
使用可&編集ロック有り
Private Sub Form_Load()
'使用可
Me.textName.Enabled = True
'編集ロック有
Me.textName.Locked = True
End Sub
テキストボックスにカーソルは移動できますが、入力出来ない状態です。実行結果

使用不可&編集ロック無し
Private Sub Form_Load()
'使用不可
Me.textName.Enabled = False
'編集ロック無し
Me.textName.Locked = False
End Sub
テキストボックスにカーソルが移動できません。背景色もグレーになっています。実行結果

使用不可&編集ロック有り
Private Sub Form_Load()
'使用不可
Me.textName.Enabled = False
'編集ロック有り
Me.textName.Locked = True
End Sub
こちらもテキストボックスにカーソルを移動できません。ただし今度は背景色が白になっています。実行結果

スポンサーリンク