display date using format ?

[dskp]

i want to display date in a text box which is in a flex grid

 
         Estval = bookval.EstimatedLife  'here value in Estval = 700
        Estval = Estval / 100                    'here value in Estval = 7
       MainBookFlexGrid(1).col = col
        MainBookFlexGrid(1).Row = 5
      MainBookFlexGrid(1).Text = Format(Estval, "00 yrs 00 mos")   'here it becomes 00 yrs 07 mos

MainBookFlexGrid(1).Text = Format(Estval, "00 yrs 00 mos")--->this displays 00 yrs 07 mos instead of 07 yrs 00 mos


where am i going wrong?
plz help..