vb split函数

### VB 中 `Split` 函数的使用方法

#### 定义与功能
`Split` 函数用于将字符串按照指定的分隔符拆分成多个子串，并返回这些子串组成的数组。此函数广泛应用于处理由特定字符分隔的数据集。

#### 基本语法结构

Function Split(Expression As String, [Delimiter As String], [Limit As Long], [Compare As VbCompareMethod]) As String()

- **Expression**: 必需参数，表示要被分割的目标字符串。
- **Delimiter** (可选): 字符串表达式，作为字段之间的界限；默认为空格 (" ")。
- **Limit** (可选): 表示最大可能部分数目的Long整型数值；如果省略，则假定为–1（无限制），即整个输入都被解析直到结束为止[^1]。
- **Compare** (可选): 指明比较方式的常量值，可以取 vbBinaryCompare 或者 vbTextCompare，默认采用二进制比较模式[^2]。

#### 实际应用案例展示

##### 示例一：简单逗号分隔列表
当面对像 `"1,2,3"` 这样的序列时，可以通过设置 `,` 作为分隔符来轻松获取各个独立项：

Sub Example_Split_CommaSeparatedList()
    Dim sInput As String
    Dim vOutput() As String
    
    ' 初始化待分割字符串
    sInput = "1,2,3"
    
    ' 执行分割操作
    vOutput = Split(sInput, ",")
    
    ' 输出结果验证
    For i = LBound(vOutput) To UBound(vOutput)
        Debug.Print vOutput(i)
    Next i
End Sub

##### 示例二：多词短语按空格划分
对于包含若干单词并以空白间隔开来的句子，比如 `"Good good study day day up"` ，可以直接调用不带额外参数的形式来进行切割：

Sub Example_Split_SpaceDelimitedPhrase()
    Dim sSentence As String
    Dim vWords As Variant
    
    ' 设置源文本
    sSentence = "Good good study day day up"
    
    ' 应用Split函数，默认以空格区分各成分
    vWords = VBA.Split(sSentence)
    
    ' 展现分解后的元素集合
    For Each word In vWords
        Debug.Print word
    Next word
End Sub

##### 示例三：复杂情况下的自定义分隔符运用
有时数据间可能存在复合形式的连接符号，例如 `-` 和 `,` 的组合，在这种情况下则需要更精确地指明分界线以便正确提取所需片段：

Sub Example_Advanced_CustomDelimiterUsage()
    Dim complexString As String
    Dim resultArray() As String
    
    ' 构建具有混合分隔符的测试字符串
    complexString = "1,2,3,4-dsd-ad5,6,7890"
    
    ' 利用正斜杠替换连字符，统一成单一类型的分隔标记后再做进一步处理
    complexString = Replace(complexString, "-", ",")
    
    ' 正规化之后再执行标准流程
    resultArray = Split(complexString, ",")
    
    ' 查看最终获得的结果集
    For j = LBound(resultArray) To UBound(resultArray)
        Debug.Print resultArray(j)
    Next j
End Sub

通过上述例子可以看出，无论是在基础场景还是较为复杂的环境中，`Split` 都能有效地帮助开发者完成对字符串的有效切片工作。