有一個更好的方法嗎？我不需要保留陣列中的資料。
ReDim Test(4)
For i = 0 to Test.Count()-1
Test(i) = New MyObject
Next
uj5u.com熱心網友回復：
如果按如下所示填充陣列，ReDim則不需要。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim Test1() As Integer
Test1 = {0, 1, 2, 3}
For Each i In Test1
Debug.Print(i.ToString)
Next
Dim Test2() As Coffee
'I have a Coffee class with a parameterized constructor
Test2 = {New Coffee("Folgers", 0), New Coffee("Pete's", 1), New Coffee("Tully's", 2), New Coffee("Green Mountain", 3)}
For Each c In Test2
Debug.Print(c.Name)
Next
End Sub
uj5u.com熱心網友回復：
我找到了我要找的東西
test = Enumerable.Repeat(New MyObject, 4)
編輯：那不是我想要的，因為它只是創建了相同的物件。這就是我一直在尋找的。
test = Enumerable.Range(1,4).Select(Function(i) New MyObject()).ToArray
轉載請註明出處，本文鏈接：https://www.uj5u.com/yidong/314904.html