打开Foxtable自带的基本功能演示文件，然后在命令窗口执行：
Dim vals As New List(of String)
vals.Add("PD01")
vals.Add("PD02")
vals.Add("PD03")
Dim flt As String = "产品 in ("
For i As Integer = 0 To vals.Count - 1
If i > 0 Then
flt = flt & ","
End If
flt = flt & "'" & vals(i) & "'"
Next
flt = flt & ")"
MessageBox.show(flt)
DataTables("订单").Fill("Se lect * Fro m {订单} Where " & flt,False)
其实帮助不少类似的例子：
实际上不需要任何例子也能写出来，你只需要要明白in的语法是：
SELE CT * F ROM {订单} WHERE 产品 IN ('PD01','PD02')
你就可以照着合成了，所有的表达式合成都是一回事。
加好友 
发短信
Post By：2020/5/3 8:42:00 [显示全部帖子]
