how to make a label show when 10 days before date is due

[sspreyer]

hi ,
all

right i'm trying to make a label show if the date in my next service field is 10 days till its due

this what I have on a on current form event this works great but would like the message to appear 10 days before the date is passed

If Me.NextService < Date Then
Me.overdue.Visible = True
Else
Me.overdue.Visible = False
End If

also tried this with no joy

If Me.NextService < Date <= 10 Then
Me.overdue.Visible = True
Else
Me.overdue.Visible = False
End If

thanks in advance

shane

 

[vbaInet]

You deduct 10 days from the Date() the same way you do it in Maths Shane.

 

[sspreyer]

hi

thanks worked great
but now how do I make it work on a range say 4 days up to 10 days before

If Me.NextService > Date - 10 Then
Me.overdue.Visible = True
Else
Me.overdue.Visible = False
End If
If Me.ExMask = True Then
Me.Combo74.Enabled = False
Else
Me.Combo74.Enabled = True
End If

thanks

shane

 

[vbaInet]

but now how do I make it work on a range say 4 days up to 10 days before

4 days up to 10 days before Shane? Help me out!

 

[sspreyer]

4 days up to 10 days before Shane? Help me out!

sorry lol

my bad silly question I have solved it

thanks again vbainet
shane

 

[vbaInet]

Good job!