Создайте собственные примеры данных в LinqPad

Question

У меня есть класс (vb.net) с некоторыми данными, которые я хочу запросить в LinqPad. Я уже работал с некоторыми примерами как с «Linq in Action», поэтому они работают с некоторыми классами с данными, а также для объяснения запросов. Но я просто не могу найти ничего о том, как импортировать или писать свои собственные классы. Может ли кто-нибудь помочь мне здесь?

Мой класс выглядит следующим образом:

Public Class Employee 
    Public Property ID As Integer 
    Public Property Salery As Integer 
    Public Property Name As String 
    Public Property Department As String 
    Public Property Gender As String 

    Public Shared Function GetAllEmployees() As List(Of Employee) 
     Return New List(Of Employee) From { _ 
      New Employee With {.ID = 1, .Name = "Mark", .Department = "HR", .Gender = "Male", .Salery = 12000}, 
      New Employee With {.ID = 2, .Name = "Sandra", .Department = "IT", .Gender = "Female", .Salery = 2000} _ 
     } 
    End Function 
End Class 

Answer 1

Вы можете отсутствовать пару вещей об использовании LINQPad:

• Установите язык для «VB программы» и положить классы, где комментарий говорит.
• Используйте метод Dump для вывода выражения. (Для «выражения VB» Dump вызывается автоматически.)

Вот пример. (Обратите внимание, что вы можете использовать этот синтаксис, похожий на SQL.)

Sub Main 

    Employee.GetAllEmployees() _ 
     .Where(Function (employee) employee.Department = "HR") _ 
     .Dump() 

    Dim hrEmployees = From employee In Employee.GetAllEmployees() 
     Where employee.Department = "HR" 
    hrEmployees.Dump() 

End Sub 

' Define other methods and classes here 
Public Class Employee 
    Public Property ID As Integer 
    Public Property Salery As Integer 
    Public Property Name As String 
    Public Property Department As String 
    Public Property Gender As String 

    Public Shared Function GetAllEmployees() As List(Of Employee) 
     Return New List(Of Employee) From { _ 
      New Employee With {.ID = 1, .Name = "Mark", .Department = "HR", .Gender = "Male", .Salery = 12000}, 
      New Employee With {.ID = 2, .Name = "Sandra", .Department = "IT", .Gender = "Female", .Salery = 2000} _ 
     } 
    End Function 
End Class