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

myrfy2004 2007-12-05 12:50:01
在一个下限约为50000的String()中快速寻找到与指定字符相匹配的内容,应如何处理?
...全文
104 2 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
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

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧