VB rule for Salary date validation not working

We have a requirement in change salary page, if the start date is first of the month or Sunday then HR will be allowed to proceed and do the transaction, else based on the date validation it should throw error. We have written the below conditions using VBS but its not working for us. If anyone worked on the same kind of scenario kindly provide us inputs that could help us. Thanks in Advance.