my $arr = Variant( VT_VARIANT | VT_ARRAY, 25);