Trabajando con Calendarios en Gambas

Debido a que necesitaba contar con un calendario para una aplicacion que estaba desarrollando me lanze a la busqueda a ver que me ofrecia Gambas y me encontre con el control DateChooser.

Su ventana de propiedades es como sigue:

La aplicacion completa es mas o menos asi.

Tengo un boton, una caja de texto y el control DateChooser en el modo de diseño pongo el control DateChooser invisible de tal manera que al lanzar la aplicacion nos aparezca de este modo.

Y cuando le damos click al boton la aplicacion nos muestra lo siguiente:

El código que hace esto es el siguiente:

'El metodo Raise envia el control al frente del contenedor
Calendario.Raise()
'El metodo Show nos muestra el control
Calendario.Show()

Si seleccionamos una fecha del control este lo mostrara en la caja de texto, trabajamos esto en el evento change del DateChooser.

PUBLIC SUB Calendario_Change()

    txtFecha.Text = Calendario.Day & "/" & Calendario.Month & "/" & Calendario.Year
    Calendario.Hide()

END


Bueno yo particularmente no estoy muy conforme con la solucion que he encontrado asi que si alguien me puede ayudar a corregir y mejorar esto se lo agradeceria muchisimo.
Saludos combativos.