怎样让访问简单变量总是快于数组元素值

资讯 2008-05-07 驱动中国若水 887 次阅读 0 条评论

读写数组中的元素速度通常都慢于访问一个简单变量，因此，如果在一个循环中要重复使用同一数组元素值，就应该分配数组元素值到临时变量中并使用这个变量。下面举一个例子，检测整数数组中是否存在重复项：

Function AnyDuplicates(intArray() As Integer) As Boolean

'如果数组包含重复项，返回True

Dim i As Long, j As Long,

Dim lastItem As Long

Dim value As Integer

'只计算机UBound()一次

lastItem = UBound(intArray)

For i = LBound(intArray) To lastItem

' 保存intArray(i)到非数组变量中

value = intArray(i)

For j = i + 1 To lastItem

If value = intArray(j) Then

AnyDuplicates = True

Exit Function

End If

'没有发现重复项

AnyDuplicates = False

End Function

上述程序有2层循环，通过缓存intArray(i)的数值到一个普通的、非数组变量中，节省了CPU运行时间。经测试，这将提高80%的速度。

元素总是变量访问简单怎样 intArray As

本文价值 ★★★★★ — 成为第一个评分的人

登录后为本文打分

网友评论0 条评论

正在回复的评论取消

评论加载中…

🔐

评论、点赞均可赚积分
连续签到、邀请好友也有奖励 🎁