title: access vba array - subscript out of range error #9
body: <p>say I have a table with column A, B &amp; C and I have the following codes to find the column names and I want to join these names as array like "A B C". However, it returns with subscript out of range run time error9. What I should do to get rid of this error? Thanks in advance!</p>
  
  <pre><code>Option Compare Database
  
  Private Sub check_tbl2_Click()
  Dim ind() As String
  Dim joinInd As String
  Dim l As Integer
  For l = 0 To CurrentDb.TableDefs("tbl2").Fields.Count - 1
    MsgBox (CurrentDb.TableDefs("tbl2").Fields(l).Name)
    ind(l) = CurrentDb.TableDefs("tbl2").Fields(l).Name
  Next l
  joinInd = Join(ind)
  MsgBox (joinInd)
  End Sub
  </code></pre>