I'm a happy camper!!

I am trying to get the previous days date, and I ran across this code in the 'Tips' section: GetDate>today Sub>today,1 MidStr>today,1,2,d Let>d=d-1 If>d=0,Start Goto>End Label>Start .. Message>Today Is The Last Day of The Month! .. Label>End The problem is that when I try to run this, I get an error...