[vb6] - Routine per la somma automatica dei campi di tipo string di un type

[vtr2009]

ciao a tutti

ragazzi ho cercato un po in giro, ma non sono riuscito a trovare quello che mi serve.
Vorre fare la somma tra stringhe, in una variabile singola, del stringhe contenute nei campi di una variabile definita da me:

Tupe myType
  campo1
  campo2
  ...
enb type

Il type può avere un numero variabile di campi.

Vorrei creare una routine sulla quale non devo intervenire se per esempio modifico il type.

Attualmente ho questa cosa:

Public Function UnisciCampi(L As myType) As String

 UnisciCampi = ""
 
  With L
    .campo1 & _
    .campo2
    ...
  End With

End Function

Qualcuno mi puù aiutare?
Pensavo di avere una cosa del genere (in metalinguaggio):

Public Function UnisciCampi(L As myType) As String

 UnisciCampi = ""
 

 1 - scorre i campi di mytype 
 2 - somma a quello precedente
  

End Function

grazie a tutti anticipatamente