VarSetCapacity(Var, 10240000) ; allocate 10 megabytes MsgBox % size := VarSetCapacity(Var) ; 10240000