FUNCAO COMO PARAMETRO

CRUDO 06/08/2009 10:00:57
#319086

Alguem sabe se é possível passar uma função como parametro de outra função? Igual como se pode fazer em C.

Grato.
TECLA 06/08/2009 20:25:05
#319147
Sim.
Segue um pequeno exemplo:

Option Explicit


Chamada às duas funções
Private Sub Command1_Click()
MsgBox (Dois(Um(1)))
End Sub


Função 1
Function Um(Param As Integer) As Integer
Um = Param
End Function


Função 2
Function Dois(Param As Integer) As String
Dois = Param & [Ô]|Teste|[Ô] & Param
End Function


é isso!
Tópico encerrado , respostas não são mais permitidas