How do I tell the db to "do nothing?"

[dbgurl]

I have a scenario where if the difference in a records origination date and today's date is >1 and <4 then an automatic email is sent for that record.

Unfortunately, this isn't covering the scenario where the difference is 1 (if the origination date = today's date).

How do I tell the db to

If dDate is =1 Then "do nothing"

then go to the second statement which is

If dDate is >1 and dDate is <4 Then
Dim objOutlook As Outlook.Application
Dim objEmail As Outlook.MailItem

Set objOutlook = CreateObject("Outlook.application")
Set objEmail = objOutlook.CreateItem(olMailItem)

(etc.)