.版本 2

.程式集 視窗程式集1

.程式集變數 自定義型別_陣列, 自定義型別, , "0"

.子程式 方法_加入成員

.區域性變數 自定義型別, 自定義型別

自定義型別.a ＝ 100

自定義型別.b ＝ “這是文字成員”

加入成員 (自定義型別_陣列, 自定義型別)

輸出除錯文字 (取陣列成員數 (自定義型別_陣列))

.子程式 方法_重定義陣列

.區域性變數 n, 整數型

n ＝ 取陣列成員數 (自定義型別_陣列) ＋ 1

重定義陣列 (自定義型別_陣列, 真, n)

自定義型別_陣列 [n].a ＝ 200

自定義型別_陣列 [n].b ＝ “成員”

輸出除錯文字 (取陣列成員數 (自定義型別_陣列))

.版本 2

.資料型別 自定義型別

.成員 a, 整數型

.成員 b, 文字型

順便說一下樓主的“【陣列設定為0，既無限】”

看樓主的意思似乎是理解為，設定這個陣列為其它數值這個陣列就固定了，不能變大了？！！

陣列0即是該陣列的初始成員數為0，並不是指"無限"

同樣，設定該陣列為1，則是說它的初始成員數為1，並不是說它永遠只能是1

其實陣列設定為0、1、2、3....沒有本質的區別，它他都是“無限”的

“無限”......其實還是有限的