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

 

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

 

posted @ 2019-07-04 22:24  赏尔  阅读(2445)  评论(0编辑  收藏  举报