8 lines
180 B
Text
8 lines
180 B
Text
Public Sub WriteACommaSeparatedList()
|
|
Dim i As Integer
|
|
Dim a(1 To 10) As String
|
|
For i = 1 To 10
|
|
a(i) = CStr(i)
|
|
Next i
|
|
Debug.Print Join(a, ", ")
|
|
End Sub
|