Data1.RecordSource = "PARAMETERS [FROM DATE] DateTime [TO DATE] DateTime;"
Data1.RecordSource = "SELECT * from MASTER where DATE_OPENED between [FROM DATE] AND [TO DATE]"

You will need to do something like this

"SELECT * FROM MASTER WHERE DATE_OPENED between " & [FROM DATE] & " AND " [TO DATE]"