FUNCAO COMO PARAMETRO
Alguem sabe se é possÃvel passar uma função como parametro de outra função? Igual como se pode fazer em C.
Grato.
Sim.
Segue um pequeno exemplo:
Chamada à s duas funções
Função 1
Função 2
é isso!
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