如何将拼接SQL的If...Then逻辑转为VB.NET等效LINQ查询（OR运算符）

嘿，我来帮你把这段动态SQL转成等效的LINQ查询～先理清楚你原代码的核心逻辑：根据a、b、c三个布尔开关动态拼接OR条件，最后还会清理掉末尾多余的OR避免SQL语法错误。因为LINQ默认的Where链式调用是AND逻辑，直接写肯定达不到你的要求，下面两种方法都能实现你的需求：

PredicateBuilder是专门用来构建动态OR/AND逻辑的工具，用它来实现你的需求非常直观。首先你需要通过NuGet安装LINQKit包，然后可以这么写：

Imports LinqKit

' 假设YourTableType是你的实体类类型，dbContext是你的数据库上下文
Dim predicate = PredicateBuilder.True(Of YourTableType)()

If a Then
    predicate = predicate.Or(Function(x) x.red = True)
End If
If b Then
    predicate = predicate.Or(Function(x) x.yel = True)
End If
If c Then
    predicate = predicate.Or(Function(x) x.gre = True)
End If

' 执行查询并选择需要的字段
Dim result = dbContext.YourTable
    .Where(predicate)
    .Select(Function(x) New With {
        x.id,
        x.red,
        x.yel,
        x.gre
    })
    .ToList()

这里用PredicateBuilder.True作为初始基准，后续的Or操作会正确叠加OR条件。如果a、b、c全为false，predicate会保持“始终为真”，最终返回全表数据——这比你原代码里生成WHERE后空字符串的无效SQL要更合理。

如果你不想引入额外包，也可以用原生LINQ的方式实现：

' 先初始化查询，选择需要的字段
Dim query = dbContext.YourTable.Select(Function(x) New With {
    x.id,
    x.red,
    x.yel,
    x.gre
})

' 收集所有需要生效的OR条件
Dim activeConditions As New List(Of Func(Of YourTableType, Boolean))()
If a Then
    activeConditions.Add(Function(x) x.red = True)
End If
If b Then
    activeConditions.Add(Function(x) x.yel = True)
End If
If c Then
    activeConditions.Add(Function(x) x.gre = True)
End If

' 根据条件数量处理查询
If activeConditions.Count > 0 Then
    ' 用Any实现OR逻辑：只要满足其中一个条件就返回
    query = query.Where(Function(x) activeConditions.Any(Function(cond) cond(x)))
Else
    ' 没有任何条件时返回全表，你也可以根据需求调整这里的逻辑
End If

Dim result = query.ToList()

这个方法先把需要的条件收集到列表里，再用Any来实现“满足任一条件”的OR逻辑，同样能达到你要的效果。

记得把代码里的YourTableType和dbContext.YourTable替换成你实际的实体类类型和数据库上下文对应的DbSet名称哦。

内容的提问来源于stack exchange，提问作者CzarnyLewis