宣言方法

質問

クラスをつくるのですが

Dim a as class1

と宣言したときにaをa(0).field1=1というふうに配列のように使いたいのです。

Dim a() as class1

とすれば話は早いのですが、上記のようにしろといわれています。
こういったことはできますでしょうか？

回答No.1

naganaga_001 · ベストアンサー

お世話になります。

バージョンが解りませんが、.NET ならこういうことはできます。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　　Dim t As TestClass = New TestClass
　　t.Add("aaa")
　　t.Add("bbb")
　　t.Add("ccc")

　　Console.WriteLine(t(1).ToUpper())
End Sub

===========================================================================
Public Class TestClass

　　Private m_souko As ArrayList = New ArrayList

　　Public Function Add(ByVal item As String) As Integer
　　　　Return Me.m_souko.Add(item)
　　End Function

　　Default Public ReadOnly Property Item(ByVal index As Integer) As String
　　　　Get
　　　　　　Return DirectCast(Me.m_souko(index), String)
　　　　End Get
　　End Property

End Class