Question

我可以为我的班级创建一个数组的字段就好了。我无法将我的属性创建为数组。我真的需要逐个定义每个属性吗？或者有更好的方法来做到这一点。我尝试的一切都给了我一个错误。 _Pencil（5）给了我一个错误。

Public Class Pens

Private pens(5) As Integer

ReadOnly Property _Pencil(5) As Integer
    Get
        Return pens(0)
        Return pens(1)
        Return pens(2)
        Return pens(3)
        Return pens(4)
        Return pens(5)
    End Get
End Property

结束班

我非常感谢所有的帮助。

更新Edwin代码效果很好，但我无法检索信息

类标记

  Private _pens(5) As Integer

   Public ReadOnly Property Pencil As Integer()
      Get
          Return _pens
      End Get
   End Property

   Sub New()
      _pens(0) = 1
      _pens(1) = 2
      _pens(2) = 3
      _pens(3) = 4
      _pens(4) = 5
      _pens(5) = 6
    End Sub


 End Class

这似乎有效但当我创建对象时无法看到_pens（0），_ pens（1）等的值

昏暗测试为新标记（）

test.Pencils＆lt; ----我看不到数组的元素

由于

Answer 1

阵列是它自己的东西。您只需返回它而不指定每个项目。下划线通常表示私有字段。

试试这个：

Private _pens(5) as Integer

Public ReadOnly Property Pencil As Integer()
    Get
       Return _pens

    End Get
End Property

Answer 2

尝试

ReadOnly Property Pencil() As Integer
    Get
 Return pens(0)
        Return pens(1)
        Return pens(2)
        Return pens(3)
        Return pens(4)
        Return pens(5)
    End Get
End Property

只需使用pencil（）代替_pencil（5）

vb使用数组创建属性

2 个答案: