Calculating in form

[kgerlitz]

I have created an unbound field named "RemainingDays". I want the value of this field to be the field "BMDueDate" subtracted by the current date. The code below does not give me any errors but the results for every record are "-491". What am I doing wrong? Thanks for your help

Private Sub Form_Open(Cancel As Integer)
Me.RemainingDays.Value = Me.BMDueDate.Value - Date
End Sub

 

[kgerlitz]

I mistyped the formula in the last post--it actually ends with "Date ()

 

[Lilliabeth]

Just a thought: You could put this in the Control Source property of the Remaining Days textbox:
=DateDiff("d",[txtBMDueDate],Date())

 

[TheAceMan1]

How are ya kgerlitz . . .

[blue]    Me.RemainingDays = DateDiff("d", Date, Me.BMDueDate)[/blue]

See Ya! . . . . . .

 

[PHV]

Set the ControlSource property of RemainingDays to:
=Date()-[BMDueDate]

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886