Como llamar una funcion con un control como argumento

[tazzito]

acabo de hacer la prueba con este codigo y no tuve problema

Function limpiaframe(miFrame As Frame)
miFrame.Caption = ""
For Each c In miFrame.Container
If TypeOf c Is TextBox Then
c.Text = ""
End If
Next
End Function

Private Sub Command1_Click()
Call limpiaframe(Me.Frame1)
End Sub