マウスクリック時にTextBoxの文字列反転表示をするには？ (ID:119292)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 VB.NETでTextBoxをマウスクリックした時に文字列を反転表示させる方法が解りません。 ちなみに以下のような動作をするのが理想です。 ①１回目のクリック時は文字列反転表示 ②２回目のクリック時はクリックした文字の箇所にカーソルが移動して、その箇所から文字列が編集可能 Enterイベントで.SelectAllを使用しても反応がありませんでした。 MouseDownイベントで.SelectAllを使用すると一応文字列が反転表示されますが、クリック する度に必ず反応表示してしまい、②の動作が実現しません。 ちなみに、以下のようにフラグで制御すると理想の動きにはなるのですがあまり綺麗ではない気がします。。。 （そういうカスタムコントロールを作成すればいいんですが、、、） もっとスマートな方法がありませんでしょうか？ '反転表示フラグ作成 Private blnSelectAll As Boolean = False 'マウスクリック時反転表示＆反転表示フラグON Private Sub TextBox1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TextBox.MouseDown If Not blnSelectAll Then TextBox.SelectAll() blnSelectAll = True End If End Sub 'フォーカスを失った時に反転表示フラグOFF Private Sub TextBox_LostFocus(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox.LostFocus blnSelectAll = False End Sub すいませんが、よろしくお願いします。