Вы можете использовать ключевое слово let:
Dim query = From u In db.Users _
let First_Name = u.FirstName
Select First_Name
Как показали другие ответы, это бесполезно. Однако ключевое слово let полезно для выполнения более сложных запросов (этот пример не в моей голове и не требует работы ключевого слова let):
from x in dc.Users
let match = regex.Match(".*ass.*", x.Name)
let comment = match ? "*snicker*" : "sup"
select new { Name = x.Name, Comment = comment };