function confirmDelete(entityToDelete)
	confirmDelete = (msgbox("Weet je zeker dat " + entityToDelete + " verwijderd moet worden?",vbyesno+vbDefaultButton2,"PG Warmond")=vbyes)
end function