快速清除数组部分内容

2008-02-23 06:40:00来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

清除动态数组的最快方法是使用ReDim,清除静态数组则是使用删除。但是如果只想清除数组的一部分内容,怎么办呢?看上去似乎只能使用For-Next循环了。

如果处理的是数字数组,有一个较快的方法。它基于ZeroMemory API函数,正如函数名所示,它能将一块内存区域填充为0。看看怎么应用这个函数来清除一个Long类型数组的一部分内容:

Private Declare Sub ZeroMemory Lib "kernel32" Alias "RtlZeroMemory" (dest As Any, ByVal Bytes As Long)

'定义数组,填充数据

Dim a(1000) As Long

For i = 1 To UBound(a)

a(i) = i

Next

'从a(200)开始清除100个元素内容

ZeroMemory a(200), 100 * Len(a(1))

请注意上述代码中清除长度的表示方法,使用Len()函数保证了当数组类型改变时代码仍然有效。

上一篇: 另辟蹊径处理字符串中的字符:字节数组法
下一篇: 创建任意长度重复字符串的简洁方法

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:深入使用LIKE操作符

下一篇:你真正理解"Allow Unrounded Floating Point Operations"选项的