VETOR DO NOME

MARCELOFAZAN 29/03/2010 22:20:49
#338184
Pessoal , o text2 seria o campo do nome , mais somente consigui trazer o codigo dentro dele
como faço para colocar o nome do funcionario no vetor

Dim i As Integer
Dim vetor As Variant
vetor = Split(Text4.Text)
For i = LBound(vetor) To UBound(vetor)
Text2.Text = vetor(i)
Next

Sql = [Ô]Select nome *as nNome* from buscar
Text2.Text = nNome

preciso colocar o campo nome no meio do vetor pra retornar o nome
alguem sabes como consigo


PEGUDO 29/03/2010 23:29:07
#338189
Resposta escolhida
Cara,
Seu vetor não está definido.
Falta declarar o tamanho dele.

Exemplo: [txt-color=#0000f0]Dim[/txt-color] Vetor(150) [txt-color=#0000f0]As Variant[/txt-color]

Ou

[txt-color=#0000f0]Dim[/txt-color] Vetor() [txt-color=#0000f0]As Variant[/txt-color]

Neste segundo caso (Vetor dinâmico), você precisará utilizar [txt-color=#0000f0]Redim Preserve[/txt-color]

Valeu.
MARCELOFAZAN 29/03/2010 23:51:37
#338191
Obrigado a dica,
tem algum exemplo dessa utilizacao

nesse caso nao precisar chamar a conexao ???
Obrigado
Tópico encerrado , respostas não são mais permitidas