VBAで配列を1文字列に合体

Sub JoinTest()
    Dim ar(2)   As String
    
    ar(0) = "aa"
    ar(1) = "bbb"
    ar(2) = "cccc"
    
    Dim s       As String
    
    s = Join(ar, ",")
    
    Debug.Print s
End Sub