Я не уверен, но если это не так, это довольно близко?
Using db As TestContext = New TestContext("connectionString")
Dim result = (From v In db.Verbiages Join vt In db.Verbiage_Types
On v.Verbiage_Type_Id Equals vt.Verbiage_Type_Id
Where vt.Verbiage_Type = "ENROLLMENT"
Group v.Verbiage, v.Sequence By v.Verbiage, v.Sequence Into Group
Where Sequence = Group.Max(Function(n) n.Sequence)
Select Verbiage)
End Using