//定義動態數組tt
Sub？tt()
暗淡？a()？作為？整數
雷迪姆？a(1？去哪？2,?1?去哪？1)?作為？整數
a(1，？1)?=?10
我？=?10
雷迪姆？保存？a(1？去哪？2,?1?去哪？我)？作為？整數
MsgBox？a(1，？1)
結束？潛水艇