SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => VBA => Mensaje iniciado por: Homar2006 en Miércoles 6 de Junio de 2007, 21:58

Título: Parametros Opcionales
Publicado por: Homar2006 en Miércoles 6 de Junio de 2007, 21:58
Buenas Tardes..

Tengo el siguiente codigo:


  Sub MiFunc(MiCad As Object, Optional MiArg1 As Object, Optional MiArg2 As  
  Object)
     MiCad.Enabled = False
     MiArg1.Enabled = False
     MiArg2.Enabled = False
  End Sub

Yo se que al mandarle todos los parametros me realiza las sentencias...pero al enviarle 1 o 2 parametros me saca error...

¿Como puedo llamar esta Sub con 1 o 2 parametros?
Esta bien esto: Call MiFunc(cbDeptoExp, , )
Título: Re: Parametros Opcionales
Publicado por: F_Tanori en Miércoles 6 de Junio de 2007, 22:38
No necesitas las comas
Código: Text
  1.  
  2. Call MiFunc(cbDeptoExp)
  3.  

Al menos que desees 'brincar' el parametro

Código: Text
  1. Call MiFunc(cbDeptoExp, , cbDeptoExp2)
  2.  


tambien puedes mandarlo llamar sin CALL con el puro nombre
omitiendo los parentesis

Código: Text
  1. MiFunc cbDeptoExp, , cbDeptoExp2
  2.  


¿Cual es el error que te aparece, y en que programa lo utilizas (Access,Excel ....) ?

Saludos
Título: Re: Parametros Opcionales
Publicado por: Homar2006 en Jueves 7 de Junio de 2007, 19:02
Gracias por la ayuda moderador....