Did it myself. Thanks for all the help lol
Just in case anybody comes across this here's what I did. Might not be right but it was the best I could do....
Code:
Private Sub btnFindVolunteer_Click()
'assign the variables
Dim MyDB As DAO.Database
Dim qdef As DAO.QueryDef
Dim strSQL As String
Dim Day As String
'pull the day from the form
Day = Me.Day
'let the engine know which database to use
Set MyDB = CurrentDb()
'here's the SQL we need to use
strSQL = "SELECT Volunteer.Title, Volunteer.ForeName, Volunteer.FamilyName, Volunteer.PhoneNo " & _
"FROM Volunteer INNER JOIN Availability ON Volunteer.VolunteerID = Availability.VolunteerId " & _
"WHERE (((Availability.Day)= '" & Day & "') AND ((Volunteer.CRBCheckDate) Is Not Null))"
'delete the old query :)
MyDB.QueryDefs.Delete "FindEventVolunteer"
'now recreate the query
Set qdef = MyDB.CreateQueryDef("FindEventVolunteer", strSQL)
'Open the query and display to the user
DoCmd.OpenQuery "FindEventVolunteer", acViewNormal
End Sub