COMO CHAMAR A FUNCAO E PASSAR OS PARAMETROS

USUARIO.EXCLUIDOS 05/10/2004 02:18:46
#44561
Amigos obrigado a todos + uma duvida cruel...como chamar e passar parametro para esta função abaixo

Public Function FuncTeste(ByRef vetor() As Long)

end function
USUARIO.EXCLUIDOS 05/10/2004 11:51:58
#44686 Resposta escolhida 
Private Sub Command1_Click()
    Dim v(2) As String
    v(0) = "1"
    v(1) = "2"
    v(2) = "3"
    Funcao v()
End Sub
Private Sub Funcao(Vetor() As String)
    MsgBox UBound(Vetor)
End Sub
USUARIO.EXCLUIDOS 05/10/2004 12:50:53
#44695
Meu colega

V(0) é string
v() é o vetor em si

Se tu quer passar um item do vetor faça

Public Function FuncTeste(ByRef vetor As Long)
end function

Tópico encerrado , respostas não são mais permitidas
Voltar