メモ

VBScript UBound の意味は「最大インデックス値」であり、要素数ではないのです。
むー。