Public Sub Form_Open()
Dim TextBox1 As New TextBox(Me)
Dim circuloTmp As Circulo
pruebas("hola", "adios", 20, "pepito", textbox1)
pruebas(4.14, 55, "gambas")
End
Public Sub pruebas(...)
Dim v As Variant
Print "---------------------------------------------------"
Print "Numero de parametros introducidos:", Param.Count
For Each v In Param
Print "valores: ", v
Next
End