Split 函數

Split 函數返回一個包含分割符的基礎上進行分隔特定數量的數組。

語法 :

Split(expression[,delimiter[,count[,compare]]]) 

1. expression, 必需的參數。該字符串表達式，可以包含分隔符的字符串。

2. delimiter, 一個可選的參數。參數用於轉換成基於定界符數組。

3. count, 一個可選的參數。要返回子串的數目，並且如果指定為-1，那麼所有的子串被返回。

4. compare, 一個可選的參數。此參數指定要使用哪個比較方法。

   • 0 = vbBinaryCompare - 執行二進製比較

   • 1 = vbTextCompare - 執行文本比較

例如：

添加一個按鈕，並添加以下功能

Private Sub Constant_demo_Click()
 ' Splitting based on delimiter comma '$'
 Dim a as Variant
 Dim b as Variant
 a=Split("Red $ Blue $ Yellow","$")
 b=ubound(a)
 For i=0 to b
    msgbox("The value of array in " & i & " is :"  & a(i))
 Next
End Sub

當執行函數輸出如下所示：

The value of array in 0 is :Red 
The value of array in 1 is : Blue 
The value of array in 2 is : Yellow