List to array?

[andre.astafieff]

Hello

A doubt with a List ...

The code below returns the following sequence: (ArrayList) [1, [email protected], 2, 2, 2, 2, 2, -23.3096963, -51.1657752, 06/10/2013 - 16:33:52, 06/10/2013 - 16:33:57]

I need to pass as parameter as follows: "1", "[email protected]", "2", "2", "2", "2", "2", "-23.3096963", "-51.1657752", "06/10/2013 - 16:33:52", "06/10/2013 - 16:33:57"


How to proceed?

Dim CarregaTabela As List
BrancoDados.setDatabase(Main.IpServer,"xxx","xxxx","xxxx")
CarregaTabela=BrancoDados.Query("select * from bebedeira where mail_user ='" & Main.UserGlobal & "'")

    For i=1 To CarregaTabela.Size-1
        row = CarregaTabela.Get(i)
   Log(row)
    Next

 

[Mahares]

I hope I understood your question Andre:

Dim CarregaTabela As List
 CarregaTabela.Initialize

Dim strVar As String
 For i=0 To CarregaTabela.Size-1
   strVar= strVar & CarregaTabela.Get(i) & ","
 Next
 strVar=strVar.SubString2(0,strVar.Length-1)  'remove last comma
 strVar=QUOTE & strVar.Replace("," , QUOTE & "," & QUOTE) & QUOTE
 Msgbox(strVar,"")  'returns: "1", "[email protected]", "2", "2", "2", "2", "2", "-23.3096963", "-51.1657752", "06/10/2013 - 16:33:52", "06/10/2013 - 16:33:57"

EDITED BY ADDING THIS OPTION: Or perhaps you are looking for this:

Dim CarregaTabela As List
CarregaTabela.Initialize

For i=0 To CarregaTabela.Size-1
    strArray(i)= CarregaTabela.Get(i)
 Next
'This will return the array:          strArray=Array as String ("1", "[email protected]", "2", "2", "2", "2", "2", "-23.3096963", "-51.1657752", "06/10/2013 - 16:33:52", "06/10/2013 - 16:33:57")