convert SQL Query in VB 6.0 into LINQ for VB.NET 2008

See more:

VB9

VB

SQL

LINQ

O masters, I would like to ask all of you. I have a problem in terms of language convert SQL to LINQ. this my source code in SQL query. please help me for convert in LINQ ... THANKS

Dim strSQL As String
Dim strVerFlag As Integer
Dim strPrtFlag As Integer
Dim strExpFlag As Integer
On Error GoTo SQLFilterHdlr
Select Case UCase(Trim(cmbPrint.Text))
    Case "UNPRINTED": strPrtFlag = 0
    Case "PRINTED": strPrtFlag = 1
    Case Else: strPrtFlag = 2
End Select
Select Case UCase(Trim(cmbVerifikasi.Text))
    Case "UNVERIFIED": strVerFlag = 0
    Case "VERIFIED": strVerFlag = 1
    Case Else: strVerFlag = 2
End Select
Select Case UCase(Trim(cmbExport.Text))
    Case "UNEXPORTED": strExpFlag = 0
    Case "EXPORTED": strExpFlag = 1
    Case Else: strExpFlag = 2
End Select
strSQL = "SELECT * FROM datBC WHERE "
If strPrtFlag < 2 Then
    strSQL = strSQL & "PrintFlag=" & CStr(strPrtFlag) & " AND "
End If
If strVerFlag < 2 Then
    strSQL = strSQL & "VerFlag=" & CStr(strVerFlag) & " AND "
End If
If strExpFlag < 2 Then
    strSQL = strSQL & "ExpFlag=" & CStr(strExpFlag) & " AND "
End If
strSQL = strSQL & "TglByr BETWEEN #" & Format(DTPicker1.Value, "MM/DD/YYYY") & "# AND #" & Format(DTPicker2.Value, "MM/DD/YYYY") & "# "
strSQL = strSQL & "ORDER BY " & sKategori & " " & sSort