タイトル : Re^4: 配列とクラス 投稿日 : 2007/04/12(Thu) 17:44 投稿者 : ひでと
重ね重ね、ありがとうございます。 > 個人的には配列ではなく、System.Collections.Generic 配下の > コレクション クラスで管理した方が便利だと思いますよ。 試してみました。こんな感じで良いのでしょうか? Private Sub Test() Dim a As New List(Of クロス材) Dim b As クロス材 b = New クロス材 : a.Add(b) b = New クロス材 : a.Add(b) a(0).板厚 = 2.3 a(1).板厚 = 3.2 Dim c As New ラダートレイ c.クロス材 = a End Sub Public Class ラダートレイ Private newクロス材 As New List(Of クロス材) Public Property クロス材() As List(Of クロス材) Get Return newクロス材 End Get Set(ByVal value As List(Of クロス材)) newクロス材 = value End Set End Property End Class VB6でもCollectionsがありましたが、使いこなせていませんでした。 おかしなところがありましたら、ご指摘ください。 PS. 配列変数も以下にテストしてみました。(修正案 2を使わせてもらったつもり) Public Sub test() Dim a() As クロス材 Dim b As クロス材 ReDim a(1) b = New クロス材 : a(0) = b b = New クロス材 : a(1) = b a(0).板厚 = 2.3 a(1).板厚 = 3.2 Dim c As New ラダートレイ c.クロス材 = a End Sub > コレクション クラスで管理した方が便利だと思いますよ このあたりの事、もう少し勉強させていただきます。 |