[VB6] Textbox e Data

[allejo]

Quando assegno il valore

msk_NomeMask.Mask = ""
msk_NomeMask.Text = ""
msk_NomeMask.Mask = gvs_date_mask
msk_NomeMask = Format(rec!Data, gvs_date_format)