- 日時： 2013/02/16 17:37
- 名前： VBレスキュー(花ちゃん)
- ***********************************************************************************
* カテゴリー：[テキストボックス][][] *
* キーワード：TextBox ,ReadOnly ,読み取り専用 , , , *
***********************************************************************************
'----------------------------------------------------------------------------------
SampleNo：047
投 稿 日：2013/02/16
投 稿 者：VBレスキュー(花ちゃん)
動作確認：Windows Vista / Windows 7 / VB2010 Pro SP1Rel / Framework 4.0 SP1Rel で
[Option Compare Text][Option Explicit On][Option Infer On][Option Strict On]で確認
'========1=========2=========3=========4=========5=========6=========7=========8===
テキストボックスを読み取り専用に設定する。
テキストボックスのテキストが読み取り専用かどうかを調べる。
TextBoxBase.ReadOnly プロパティ
テキスト ボックスのテキストが読み取り専用かどうかを示す値を取得または設定します
テキストが読み取り専用の場合は true。それ以外の場合は false。既定値は、false です。
※ この場合、TextBox を無効(TextBox1.Enabled = False)にする場合とは違い、テキストを
選択して、コピー(trl+C)して取得する事は可能です。
'----------------------------------------------------------------------------------
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.ReadOnly = True '読み取り専用に設定
TextBox1.ReadOnly = False '既定値に設定(読み書き両用)
'読み取り専用かどうかを調べる場合
If TextBox1.ReadOnly = True Then
MessageBox.Show("TextBox1 は、ReadOnly に設定されています。")
Else
MessageBox.Show("TextBox1 は、ReadOnly に設定されていません。")
End If
End Sub
|
テキストボックスを読み取り専用に設定する(VB.NET)