InstrString 函數 [物件：modStrTools 函式庫] 說明

說明

依據指定分隔字串切割字串

本函數之引數列表

引數	型態	位元組	選項	預設值	說明
objSource	Object	-	必須	(無)	目標字串或陣列。遞回呼叫本函數，使其可同時傳回多個分隔陣列
strDelimiter	Object	-	可省略	(空白字串)	分割字串或陣列。允許多種分隔字串，第一層陣列將不同分隔方式將分隔成不同格，第二層陣列將將不同分隔方式分隔成同格，且多個分隔符號視為連續
nCount	Object	-	可省略	Nothing	傳回個數或陣列。若為陣列，維度必須與 objSource相同，Nothing 傳回所有分隔陣列，0 及正數傳回某格之值，負值傳回0~該值之範圍陣列（如-5 -> arrReturn(0 To 5)）
bContinue	Object	-	可省略	False	是否連續或陣列。若為陣列，維度必須與 objSource相同，True判斷連續分隔視為同一個
ChangeVariant	Object	-	可省略	False	是否轉為變數或陣列。若為陣列，維度必須與 objSource相同，True將字串轉換為Variant

傳回值

字串或陣列

範例

Dim strOutput As Object
Dim ibr, ibc As Integer
strOutput = InstrString(MyArray("Name, , Date" & vbNewLine & ",Hi", "1, ; Null; ; 2004/3/15,,True, Nothing"), MyArray(MyArray(", ", "; "), vbNewLine, ",", ";"), MyArray(-2, Nothing), MyArray(True, False), MyArray(False, True))
For ibr = 0 To UBound(strOutput)
   For ibc = 0 To UBound(strOutput(ibr))
      Debug.WriteLine(ibr & " " & ibc & ":" & strOutput(ibr)(ibc) & "(" & TypeName(strOutput(ibr)(ibc)))
   Next
Next
' 傳回
'0 0:Name(String
'0 1: Date(String
'0 2: (String
'1 0:1(Double
'1 1:(DBNull
'1 2:2004/3/15(Date
'1 3:(String
'1 4:True(Boolean
'1 5:(Nothing

基本條件

Visual Studio .Net 2002 以後相容版本 | StrTools.vb

請參閱

modStrTools 函式庫 | CVariant | InstrString (VB)