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


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

使用可&編集ロック有り

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

実行結果









comments powered by Disqus