求用sql语句来优化！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

写了下面一段代码：

dim tb as table = tables("表1“）

For Each ro As Row In tb.Rows

Dim dr As DataRow = DataTables("表2").SQLFind("条件……'")

If dr IsNot Nothing Then

Dim s As String = dr("公式")

Dim d As Double

If Double.TryParse(s,d) Then

ro("结果") = d

Else

s = s.Replace("@", "").Replace("x", 100)

ro("结果") = Eval(s)

End If

tb.DataTable.Save

这段代码虽然可以实现我的要求，可是速度太慢，求用sql的方法批量更新，假设数据源为 con ！

主题：求用sql语句来优化！