document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. Public Sub Form_Open()
  2.  
  3.   Dim TextBox1 As New TextBox(Me)
  4.   Dim circuloTmp As Circulo
  5.  
  6.   pruebas("hola", "adios", 20, "pepito", textbox1)
  7.   pruebas(4.14, 55, "gambas")
  8.  
  9. End
  10.  
  11. Public Sub pruebas(...)
  12.  
  13.   Dim v As Variant
  14.  
  15.   Print "---------------------------------------------------"
  16.   Print "Numero de parametros introducidos:", Param.Count
  17.  
  18.   For Each v In Param
  19.     Print "valores: ", v
  20.   Next
  21.  
  22. End
');