タイトル : Re^4: タイプによって別ける必要があるのでしょうか? 投稿日 : 2007/09/29(Sat) 19:54 投稿者 : るしぇ
> となると TextBox = DirectCast(cldControl, MaskedText) > はいらないのですか? Option Strict On にしてみれば、暗黙の型変換になる部分が エラーとして判定されます。 継承元でもちゃんと評価されるのねぇ。。。ってテスト出力してみて はじめて知ったww MaskedTextBox で試したら? [VB.NET2003] Dim objTextBase As TextBoxBase Dim cldControl As Control 'TextBox cldControl = Me.TextBox1 Debug.WriteLine(TypeOf cldControl Is TextBox) Debug.WriteLine(TypeOf cldControl Is TextBoxBase) objTextBase = DirectCast(cldControl, TextBoxBase) Debug.WriteLine(objTextBase.Name) 'Button cldControl = Me.Button1 Debug.WriteLine(TypeOf cldControl Is TextBox) Debug.WriteLine(TypeOf cldControl Is TextBoxBase) 'objTextBase = DirectCast(cldControl, TextBoxBase) 'Debug.WriteLine(objTextBase.Name) |