结构体数组（动态增长），数组元素里还有数组成员，怎么定义和初始化？

[秋的红果实]

如题

'定义结构体
Public Structure RowData
Public CellData() As String
End Structure

'使用结构体
Dim myA() As RowData
初始化……？
ReDim Preserve myA(myA.Length + 1)
赋予新值……？

怎么初始化？怎么赋新值？是不是也要写构造函数。一上午都没弄出来，没用过VB.Net，只用过VB6

[兔子-顾问]

如果不确定长度，可以放弃以前vb的写法，例如

Public Structure RowData
    Public CellData() As String
End Structure

结构体可以修改定义为类，动态数组用List(Of...)替换

Public Class RowData
    Public CellData As New List(Of String)
End Class

初始化

Dim myList as New List(Of RowData)

每次增加

myList.Add(new RowData())

[threenewbee]

少用数组，多用集合和列表。

[秋的红果实]

还是不行啊 '定义类 Public Class RowData Private CellData As List(Of String) Sub New(ByVal p_cell As List(Of String)) CellData = p_cell End Sub End Class '给列表赋值 Dim myList As New List(Of RowData) Dim tempA As New List(Of String) For i As Integer = 0 To 5 tempA.Add("A" + i.ToString()) Next Dim myA As RowData = New RowData(tempA) myList.Add(myA) 怎么访问myList里的元素？我想象中的myList(0).CellData(0)无效啊？

[threenewbee]

为什么要通过构造函数传一个List呢 Public Class RowData Private CellData As New List(Of String) Sub New(ByVal p_cell As List(Of String)) CellData.AddRange(p_cell) End Sub End Class

[秋的红果实]

引用 4 楼 caozhy 的回复:

为什么要通过构造函数传一个List呢 Public Class RowData Private CellData As New List(Of String) Sub New(ByVal p_cell As List(Of String)) CellData.AddRange(p_cell) End Sub End Class

我按照你的说法改了。问题是，怎么读取里面的数据？ 我在vb.net里，纯粹菜鸟，我要取得“A2”这个值，语句怎么写？

[threenewbee]

CellData定义成public mya.CellData(0)

[秋的红果实]

我要实现行数在动态变的二维数组效果

[秋的红果实]

原来privite惹的祸