如何快速在String()中寻找与某一字符串匹配的条目?

myrfy2004 2007-12-05 12:50:01
在一个下限约为50000的String()中快速寻找到与指定字符相匹配的内容,应如何处理?
...全文
67 点赞 收藏 2
写回复
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
vbman2003 2007-12-05

Dim arr As Variant
Dim str() As String
Dim i As Integer

ReDim arr(5000)
For i = 1 To 5000
arr(i) = i
Next

str = Filter(arr, "100")
For i = 0 To UBound(str)
Debug.Print str(i)
Next

匹配100的结果:
100
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1100
2100
3100
4100
回复
vbman2003 2007-12-05
用函数:filter
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7453

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告