VBScript の変数、動的配列

everyday VBScript 
Option Explicit

Dim size

size = 1

Dim A()
ReDim A(size)

A(0) = 1
A(1) = "foo"

MsgBox A(0)
MsgBox A(1)


Preserve なしの確認

Option Explicit

Dim A()
ReDim A(1)

A(0) = 1
A(1) = "foo"

ReDim A(1)

MsgBox A(0)
MsgBox A(1)

Preserve ありの確認

Option Explicit

Dim A()
ReDim A(1)

A(0) = 1
A(1) = "foo"

ReDim Preserve A(1)

MsgBox A(0)
MsgBox A(1)