Shulou(Shulou.com)06/03 Report--

This article mainly introduces "efficiency analysis of string operation of vbs". In daily operation, I believe many people have doubts about the efficiency analysis of string operation of vbs. Xiaobian consulted all kinds of information and sorted out simple and easy to use operation methods. I hope to help you answer the doubts of "efficiency analysis of string operation of vbs"! Next, please follow the small series to learn together!

Text:

I wrote some code to test it and got the following results:

'Normal string concatenation

StringLinkTest1() 'has the worst performance, taking about 20 seconds (the worst part is that the entire CPU is running at almost 100% full capacity during these 20 seconds)

'Normal string concatenation, but temporary variables used for efficiency

StringLinkTest2() 'Amazing performance improvement, takes about 0.2 seconds

'Use Array +Join function to process

StringArrayTest() 'performs best, taking approximately 0.06 seconds

'There was originally a method that used the dictionary object: Scripting.Dictionary to operate, but because in the case of a large number of continuously used class methods, it would directly affect efficiency (efficiency between StringArrayTest and StringLinkTest2), so I won't post it here.

And the result is that we can still solve the efficiency problem in string processing in vbs.

The code is as follows:

The copy code is as follows:

iFSLen Then

iFSLen = iFSPos + iFSIncr

ReDim Preserve aFStrings(iFSLen)

End If

aFStrings(iFSPos) = sData

iFSPos = iFSPos + 1

End Property

Public Default Property Get Item()

Item = Join(aFStrings, "")

End Property

Public Sub Reset()

iFSPos = 0

iFSLen = iFSIncr

ReDim aFStrings(iFSLen)

End Sub

Public Sub Resize(n)

If Not IsNumeric(n) Then Exit Sub

iFSPos = 0

iFSIncr = n

iFSLen = iFSIncr

ReDim aFStrings(iFSLen)

End Sub

Public Property Get Strs()

Strs=aFStrings

End Property

Public Property Get Count()

Count=iFSPos

End Property

Public Property Get IsInit()

If iFSPos=0 Then IsInit=True Else IsInit=False

End Property

End Class

At this point, the study of "efficiency analysis of string operation of vbs" is over, hoping to solve everyone's doubts. Theory and practice can better match to help everyone learn, go and try it! If you want to continue learning more relevant knowledge, please continue to pay attention to the website, Xiaobian will continue to strive to bring more practical articles for everyone!

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.