Hi Robert.

One way to do it is as follows -
lnMonths = Val(Substr(TextBox.Value, At("-", TextBox.Value)+1)) * 12 + Val(TextBox.Value) - 1
lnMonths = lnMonths - 3
TextBox.Value = Padl(Int(lnMonths) % 12 + 1, 2, "0") +"-"+ Str(Int(lnMonths / 12), 4)

Ian Simcock.


>Dear Sir,
>
>I have a character type textbox="02-2005" && February 2005
>I want to substract 3 months from it.
>
>Please elp