SET CLASSLIB TO calendario ADDITIVE Thisform.Calendario=CREATEOBJECT("Calendario") Thisform.Calendario.Left= This.Left+This.Width+Thisform.Left+10 Thisform.Calendario.Top = This.Left+This.Width+Thisform.Top Thisform.Calendario.ShowNow, how can I return a value from this form. It's a modal form.