獲取特定的字符串[轉(zhuǎn)帖]

beibeijia

    為了建立一個通用的投票調(diào)查系統(tǒng)，往往不能確定有多少選項，普通的作法就是建立多個字段，比如10個字段，但要是多余10個選項就不行了。所以基于這種考慮，我設(shè)計了只需一個字段（當然長度夠長或是備注型）就可以實現(xiàn)。
aaadfgfga||bfgbbb||ccdfgsgcc||dsfdfdsf||...||
為了實現(xiàn)讀取"||"之間的內(nèi)容，我編寫了如下代碼
'SStr：表示分隔字符串，LStr：表示要搜索的字符串，i：表示要取第幾段字符串
Function GetStr(SStr,LStr,i)
dim ks,js,cd,wz,j'ks:表示開始，JS：計數(shù)，cd：長度，wz：位置，j：循環(huán)變量
     cd=Len(LStr)
     ks=1
     For j=1 to i
       wz=InStr(ks,LStr,SStr)
       If wz=0 then
           StrLen=""
       else
           StrLen=Mid(LStr,ks,wz-ks)
           ks=wz+2
       end if
     Next
End Function
這是我編寫的函數(shù)，彼此共享。

zhuyiwen

使用split函數(shù)更方便