<DisplayName("クラス")> Public Class ClassA <DisplayName("アルファ")> Public Shared ReadOnly Property Alpha As Byte Public Shared Property Beta As Byte <DisplayName("Get Beta")> Get Return 0 End Get <DisplayName("Set Beta")> Set _Beta = Value End Set End Property Private Shared _Beta As Byte End Class
<DisplayName("アイテム[number]")> Public Property Items(n As Integer) As String <DisplayName("Getアイテム[number]")> Get Return $"Items[{n}]" End Get <DisplayName("Setアイテム[number]")> Set End Set End Property <DisplayName("アイテム[string]")> Public ReadOnly Property Items(s As String) As String <DisplayName("Get アイテム[string]")> Get Return "Items." & s End Get End Property