VBA 的 Join 函数

Join 函数用指定的分隔符,将一个一维数据中的元素连接成一个字符串,类似 python 中的 join 方法。

示例代码如下:

Sub join_test()
    Dim arr As Variant, txt As String      '声明变量
    arr = Array(Array("", "", "三四", ""), Array("", "", "七八", ""))      '生成二维数组
    txt = Join(arr(1), "") & Chr(13) _
        & Join(arr(2), "")      '用 join 函数生成两行文本值
    MsgBox txt
End Sub

运行代码,弹出的消息框如下

 

原文地址:https://www.cnblogs.com/shanger/p/12991856.html