BUSCAR UM VALOR DENTRO DO ARRAY
Galera alguem sabe alguma função que me permite buscar um valor dentro de um array eu sei que se fosse no clipper eu usaria o ascan estou traduzindo uma rotina em ADVPL para vb6 e não achei nada que me ajude. segue exemplo. Obrigado
For i = 1 To 8
j := aScan( aChave2, SubStr( cPasso1, i, 1 ) )
cPasso2 += cValToChar( j - 1 )
Next i
For i = 1 To 8
j := aScan( aChave2, SubStr( cPasso1, i, 1 ) )
cPasso2 += cValToChar( j - 1 )
Next i
Veja esses dois tutoriais:
VB.NET - Arrays
Usando Array no VB.net
VB.NET - Arrays
Usando Array no VB.net
Então amigão estou usando o VB6 e ele tem diferenças quando se trata de vetores.
Como verificar se um elemento existe num Array?
1)
OU
2)
1)
[ô]Exemplo usando array:
Dim arrayX
Dim erro As Boolean
arrayX = Array(1, 2, 85, 63)
On Error Resume Next
Debug.Print arrayX(10)
erro = (Err.Number = 9)
If erro Then
Debug.Print [Ô]ocorreu erro por que não existe este elemento no array[Ô]
End If
OU
2)
percorrer o array procurando pelo valor, ou usar as
funções Filter e UBound:
arrayX = Array(1, 2, 85, 63)
n = 10
If UBound(Filter(arrayX, n)) = -1 Then
MsgBox [Ô]Não existe o [Ô] & n
Else
MsgBox [Ô]Existe o [Ô] & n
End If
Tópico encerrado , respostas não são mais permitidas