Alterar o numero de Argumentos em um String

[latsp]

Pessoal tenho a seguinte instrução:

Dim Rst1 As DAO.Recordset, Rst2 As DAO.Recordset

Dim strTabela As String, strCampos1 As String, strCampos2 As String, strCampos3 As String

Dim Cont As Integer

Dim Campo As DAO.Field

Dim PrimeiroCampo As Boolean

Dim NomeAnterior As String

Dim SomaCampo As Integer

strTabela = "RelatorioGeral"

Onde strCampos1 = "Campo2,Campo3, Campo4, Campo5, Campo6, Campo7, Campo8, Campo9"

Como eu posso editar esses valores e aumentar o numero de variaveis? (Ex: colocar Campo10, Campo11 etc etc...