|
分類:[VB.NET]
分類:[VB.NET]
2006/03/10(Fri) 16:17:53 編集(投稿者)
初めまして、VB.NETを勉強中のみぃと申します。
TextBoxを継承したカスタムコントロールを作ってみようと思い
まずは、フォーカスがあるときとないときの背景色を設定できる
コントロールを作成しました。
そこで1つわからないことがあり書き込みさせて頂きました。
作成したコントロールは次のようなものです。
Public Class TextBoxEx2
Inherits System.Windows.Forms.TextBox
Public Sub New()
MyBase.New()
End Sub
#Region "TextBoxEx_Enterイベント"
Private Sub TextBoxEx_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Enter
''背景色を設定する
With Me
.BackColor = Color.Yellow
End With
End Sub
#End Region
#Region "TextBoxEx_Leaveイベント"
Private Sub TextBoxEx_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Leave
''背景色を元に戻す
With Me
.BackColor = Color.WhiteSmoke
End With
End Sub
#End Region
End Class
これ自体は問題なく動いているのですが、このコントロールのReadOnlyプロパティを
Trueにしてもテキストボックス自体がフォーカスを取得してしまい背景色が
変わってしまいます。
カスタムコントロールをReadOnlyにしたい場合はどのようにすれば良いのか
ご教授頂けないでしょうか。よろしくお願い致します。
VS.NET2003(VB使用)
|