Function FreeDynamicStringArray(b) For i=0 To DynamicArrayCounter(b) FreeBank PeekInt(b,(i Shl 2)) Next FreeBank b End Function