If statement with Todays Date being criteria

[robsworld78]

Hi, I'm trying to create a button that posts an order and before it post certain criterias need to be meet. One of them is a date needs to be selected in the order, if not a popup show to explain.

The trouble I'm having is referring to todays date in the VBA code. I've been reading and trying different things but not getting anywhere, hopefully someone can fill me in.

This is the code I'm working with.

If [PayOrderMoneyReceivedSubform].[Form]![OrderDate] = TodaysDate Then
dosomething
else


donothing
end if

The part I'm having trouble with is TodaysDate, what should I be putting there?

[boblarson]

Today's date is

Date

If [PayOrderMoneyReceivedSubform].[Form]![OrderDate] = Date Then

[robsworld78]

Thanks Bob, I knew it was that or at least I thought it should be. Access just messing around with me again, here's why it didn't work.

The If statement has a couple And's in it and I added the date last because it was an addition. So this is what didn't work

If [OrdersOrdersSubform].[Form]![Status] = "PartialPaid" And [PayOrderInvoiceAmountOwingSubform].[Form]![MoneyOwingOnOrderTotal] < 0.01 And [PayOrderInvoiceAmountOwingSubform].[Form]![PaymentDifference] = 0 And [PayOrderMoneyReceivedSubform].[Form]![OrderDate] = Date Then

And this is what works

If [PayOrderMoneyReceivedSubform].[Form]![OrderDate] = Date And [OrdersOrdersSubform].[Form]![Status] = "PartialPaid" And [PayOrderInvoiceAmountOwingSubform].[Form]![MoneyOwingOnOrderTotal] < 0.01 And [PayOrderInvoiceAmountOwingSubform].[Form]![PaymentDifference] = 0 Then

So why does date need to be first? I see it as the exact same string. When this like this occur it makes it very hard, now I wonder how many other things I tried that didn't work and maybe because of something stupid like this. I understand if a ' or ! etc is missing but these are the same lines.