Please, read my comments to your question first.
You can use
Where
+
Any[
^], but i doubt it would improve, or even optimize, the performance of your query.
Dim remarks = {"Cancelled", "Completed"}
Dim list = from c in db.DevData.Where(Function(x) remarks.Any(Function(y) x.remark<>y))
Order By c.Id
Select ...