手順
1:以下にあるコードでTextBoxを作成
2:デザイナーでCharBoxesを複数そのまま追加
3:ビルドを行うと必ずエラー
当初シリアルズできないと出てきたので<Serializable>を追加することで対応、次にresxファイルのエラーとなりその後わからなくなりました。
VB.NET
1Imports System.ComponentModel 2 3Public Class TestClass 4 Inherits Windows.Forms.TextBox 5 Implements ISupportInitialize 6 7 Public Sub BeginInit() Implements ISupportInitialize.BeginInit 8 9 End Sub 10 11 Public Sub EndInit() Implements ISupportInitialize.EndInit 12 13 End Sub 14 15 <DesignerSerializationVisibility(DesignerSerializationVisibility.Content)> 16 Public Property CharBoxes As List(Of SubTestClass) 17 Get 18 Return _CharBoxes 19 End Get 20 Set(value As List(Of SubTestClass)) 21 Me._CharBoxes = value 22 ' 最長サイズの設定 23 If 0 < value.Count Then 24 MyBase.MaxLength = value.Count 25 Else 26 MyBase.MaxLength = -1 27 End If 28 End Set 29 End Property 30 Private _CharBoxes As List(Of SubTestClass) = New List(Of SubTestClass) 31 32End Class 33 34<Serializable> 35<TypeConverter(GetType(ExpandableObjectConverter))> 36Public Class SubTestClass 37 38 <DefaultValue(EnumType.Input)> 39 <DesignerSerializationVisibility(DesignerSerializationVisibility.Visible)> 40 Public Property Mask As EnumType = EnumType.Input 41 42 <DefaultValue(CType(" ", Char))> 43 <DesignerSerializationVisibility(DesignerSerializationVisibility.Visible)> 44 Public Property Text As Char = CType(" ", Char) 45 46 Public Sub New() 47 48 End Sub 49 50 Public Sub New(val As EnumType, txt As Char) 51 Me.Mask = val 52 Me.Text = txt 53 End Sub 54 55End Class 56 57Public Enum EnumType 58 Input = 0 59 Literal 60 Separator 61End Enum 62
###質問
カスタムTetBoxにListのクラスまたは構造体を追加したいです
上記のようなエラーが無く追加するにはどうすればよろしいでしょうか?
プロパティには列挙型とChar型の2つを追加予定です
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
退会済みユーザー
2017/05/09 03:37
退会済みユーザー
2017/05/09 07:09
2017/05/09 07:11 編集
退会済みユーザー
2017/05/09 07:27