This should do the trick:
if day({Orders.Order Date}) = 1 then {Orders.Order Date}
else
DateAdd ('m' , 1 , {Orders.Order Date} - day({Orders.Order Date}) + 1)
Check out Ken Hamady's site - there are a lot of useful formulas there, so you don't have to remember them all.