جواب رو پیدا کردم :
فعلا که خطای دیزاین برنمی گرده
Annotation 2024-04-07 213206.png
باید مقدار DesignerSerialzationVisiblity برابر با Content می شد....
<DesignerSerializationVisibility(DesignerSerializa tionVisibility.Content)> _
https://barnamenevis.org/showthread....l=1#post676850
البته هنوز نمی شه برای این خصوصیت کلاس سفارشی که یک Collection سفارشی باشه مثل این کلاس استفاده کرد: !!!!
Imports System.ComponentModel
<Serializable()> _
Public Class VariableCollection
Inherits Collections.ObjectModel.Collection(Of VariableItem)
Public Sub New()
MyBase.New()
End Sub
Public Sub New(list As Collections.Generic.List(Of VariableItem))
MyBase.New(list)
End Sub
Public Overloads Sub Add(Name As String, Value As String)
MyBase.Add(New VariableItem(Name, Value))
End Sub
Public Overloads Sub Add(Item As VariableItem)
MyBase.Add(Item)
End Sub
Default Public Overloads Property Item(Name As String) As String
Get
For Each Var As VariableItem In MyBase.Items
If Var.Name.Equals(Name, StringComparison.OrdinalIgnoreCase) Then
Return Var.Value
End If
Next
Return String.Empty
End Get
Set(value As String)
For Each Var As VariableItem In MyBase.Items
If Var.Name.Equals(Name, StringComparison.OrdinalIgnoreCase) Then
Var.Value = value
End If
Next
End Set
End Property
End Class
فکر کنم باید براش یک Editor سفارشی ایجاد کرد.