Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim ary As New ArrayList For i As Integer = 0 To 5 Dim tt As New test tt.aa = i ary.Add(tt) Next
For Each i As test In ary i.aa = 10 Next
For Each i As test In ary MsgBox(i.aa) Next End Sub
For Each t As TextBox in textBoxCollections t = New TextBox() ' t は ReadOnly なのでこれは無理 t.Text = "Text" ' メンバは ReadOnly では無いのでこれは可能 Next
さて、構造体とクラスの違いを考えたことはありますか? ClassA クラスと StructA 構造体があり、どちらも Id という Integer なメンバを持つとします。
Dim ca As New ClassA() Dim cb As ClassA = ca cb.Id = 10 と、 Dim sa As New StructA() Dim sb As StructA = sa sb.Id = 10 としたとき、ca.Id と sa.Id はどうなっているでしょうか?
> さて、構造体とクラスの違いを考えたことはありますか? > ClassA クラスと StructA 構造体があり、どちらも Id という Integer なメンバを持つとします。 > > Dim ca As New ClassA() > Dim cb As ClassA = ca > cb.Id = 10 > と、 > Dim sa As New StructA() > Dim sb As StructA = sa > sb.Id = 10 > としたとき、ca.Id と sa.Id はどうなっているでしょうか?