老师帮看一下，SQLselect和select的运行结果为什么不一样啊？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 老师帮看一下，SQLselect和select的运行结果为什么不一样啊？

共有2415人关注过本帖树形打印复制链接主题：老师帮看一下，SQLselect和select的运行结果为什么不一样啊？

guosheng

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：四尾狐帖子：897 积分：7551 威望：0 精华：0 注册：2017/12/27 14:19:00

老师帮看一下，SQLselect和select的运行结果为什么不一样啊？ 发帖心情

Post By：2018/6/19 9:38:00 [显示全部帖子]

为什么select能够达到赋值，而SQLSelect没有达到执行赋值啊？

Dim cr As Row = Tables("计划执行情况表").Current

1、Dim drs As List(of DataRow) = DataTables("计划执行情况表").SQLSelect("项目编号 ='"& cr("项目编号") &"' And 一级编号='"& cr("一级编号") &"' and 等级='二级'")

If drs IsNot Nothing

For Each dr As DataRow In drs

If dr.isnull("开始时间")

dr("开始时间")=rq

End If

2、Dim drs As List(of DataRow) = DataTables("计划执行情况表").Select("项目编号 ='"& cr("项目编号") &"' And 一级编号='"& cr("一级编号") &"' and 等级='二级'")

If drs IsNot Nothing

For Each dr As DataRow In drs

If dr.isnull("开始时间")

dr("开始时间")=rq

End If

[此贴子已经被作者于2018/6/19 9:39:03编辑过]

guosheng

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：四尾狐帖子：897 积分：7551 威望：0 精华：0 注册：2017/12/27 14:19:00

Post By：2018/6/19 12:16:00 [显示全部帖子]

再次咨询一下老师：如果在末尾加上Tables("计划执行情况表").save ，重新打开项目，并没有执行赋值代码；而如果在for循环内加入 dr.save，则赋值正常（如果不用“行”保存，而采用“表”保存的形式，应该怎么操作啊？）。表的保存和行的保存在此处运用，有什么区别吗？

Dim cr As Row = Tables("计划执行情况表").Current

Dim drs As List(of DataRow) = DataTables("计划执行情况表").SQLSelect("项目编号 ='"& cr("项目编号") &"' And 一级编号='"& cr("一级编号") &"' and 等级='二级'")

If drs IsNot Nothing

For Each dr As DataRow In drs

If dr.isnull("开始时间")

dr("开始时间")=rq

'dr.save

End If

'Tables("计划执行情况表").save

[此贴子已经被作者于2018/6/19 12:33:41编辑过]

主题：老师帮看一下，SQLselect和select的运行结果为什么不一样啊？