尝试使用Include(RelationshipName)
Dim db As New MyDbModel.MyDbEntities() Dim project As MyDbModel.Project = (From p In db.Project.Include("Status") Where p.ProjectID = 1).First Response.Write(project.ProjectName) Response.Write(project.Status.StatusName)