AJUDA COM ARRAY

LUIS.FLAVIO 05/03/2010 14:59:18
#336189
Pessoal estou com o seguinte problema

Estou precisando retornar do banco de dados uma lista de informação e colocar dentro da função Array() mesmo.

Estou tentando fazer dessa forma mas não consigo

elements = Array(Rs!elements)

No banco de dados está dessa forma
[Ô]Zn[Ô], [Ô]Fe[Ô], [Ô]Al2O3[Ô], [Ô]CaO[Ô], [Ô]MgO[Ô], [Ô]SiO2[Ô], [Ô]Pb[Ô], [Ô]S[Ô]

Mas ele não gera o Array e gera apenas uma linha do Array mas são 8, existe alguma forma de converter a string em Array.

Gostaria que fosse somente dessa forma.

TECLA 05/03/2010 16:57:58
#336195
Resposta escolhida
Tente assim:

Dim elemento As String, vetor() As String
elemento = Replace(Rs!elements, [Ô][Ô][Ô][Ô], [Ô][Ô])
vetor() = Split(elemento, [Ô],[Ô])
MsgBox UBound(vetor) + 1 & [Ô] elementos[Ô]
LUIS.FLAVIO 05/03/2010 18:18:25
#336204
TECLA só um problema agora o vetor() está retornando duas colunas.
TECLA 05/03/2010 21:54:47
#336214
Citação:

:
TECLA só um problema agora o vetor() está retornando duas colunas.


Posta um exemplo pra eu entender o que ocorre.
Tópico encerrado , respostas não são mais permitidas