- 日時： 2013/02/16 17:37
- 名前： VBレスキュー(花ちゃん)
- ***********************************************************************************
* カテゴリー：[テキストボックス][][] *
* キーワード：TextBox ,Password ,パスワード , 隠し文字 , , *
***********************************************************************************
'----------------------------------------------------------------------------------
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===
テキストボックスをパスワード入力用に設定する
TextBox.UseSystemPasswordChar プロパティ
TextBox コントロール内のテキストを、既定のパスワード文字として表示するかどうかを
示す値を取得または設定します。
TextBox コントロール内のテキストを既定のパスワード文字として表示する場合は true。
それ以外の場合は false。
TextBox.PasswordChar プロパティ
単一行 TextBox コントロールでパスワードの文字をマスクするために使用される文字を
取得または設定します。
PasswordCharプロパティが設定された TextBoxは、文字入力するごとに指定のマスク用文字に
置き換えられて表示され、選択してコピー等での取得はできなくなります。
※ UseSystemPasswordChar プロパティは、PasswordChar プロパティよりも優先されます。
UseSystemPasswordChar が true に設定されている場合、既定のシステムのパスワード文字が
使用され、PasswordChar で設定された文字は無視されます。
従って、下記コードでは、TextBox2.PasswordChar = CChar("*") は無視され、
TextBox2.UseSystemPasswordChar = True の設定の方が有効となります。
'----------------------------------------------------------------------------------
Private Sub Button2_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button2.Click
'クリック毎に True / False を切り替えています。
TextBox2.UseSystemPasswordChar = Not TextBox2.UseSystemPasswordChar
'又は、
TextBox2.PasswordChar = CChar("*")
'標準の状態に戻す場合(MSDN では、マスクしない場合は、このプロパティの値を 0 (文字値)
' に設定します。既定値も 0 (文字値) です。と書いていますが)
'TextBox2.PasswordChar = CChar(vbNullString)
'読み取る時は、普通の場合と同様にプログラムから読み取る事ができます。
MessageBox.Show("TextBox2.Text = " & TextBox2.Text)
End Sub
|
テキストボックスをパスワード入力用に設定する(VB.NET)