Dim memory(1)

memory= "何か"
Debug.print "VB使いは" & memory(1) & "を覚えている。"
Redim memory(2)
Debug.print "VB使いは" & memory(1) & "を覚えている。"

'・・・なにも覚えちゃいない。