none
字串存取速度問題 RRS feed

  • 問題

  • HI~各位,是這樣的。

    有一堆這樣的東西,先假設它們是整齊排列

    dim str as str =

    100/abcde/fghij/klm
    123/abcde/fghij/klm 124/abcde/fghij/klm 125/abcd 126/abcde/fghij/kl 127/abcde 128/abcde/fghi 129/abc

    ...延伸到不知那裡

       

    (A) 我應該把它們放到2維陣列,然後用 array(m,n) 存取比較快?

    for i = 0 to array.countX
       if array(x,0) =123 then
           myneedtext = array (i,3)
           exit for
       end if
    next
    因為如果要找越後的就會越慢,所以不太想用這方法。


    (B)還是用這方法比較快?

     Dim an = InStr(Str, 123)
     Dim bn = InStr(an, Str, vbnewline)
     Dim mytxt =Mid(Str, an, bn - an)  ' 123/abcde/fghij/klm
     Dim myneedtxt = split(mytxt,"/")(1) 'abcde

    (C) 還是有更快的存取方法?「跪」求更好的存取方法。


    2015年12月24日 上午 03:57

解答

所有回覆