主题：[求助]窗口中的表的select语句

狐狸老爹和BLACKZHU的方法都试过了，都是可行的，个人觉得BLACKZHU的方案比较好，关于窗口的代码全部设定在窗口中我觉得会好一些。

 

PS:看来窗口中的表的“SELECT语句”使用起来不太灵活啊，筛选条件要很明确才行。

呵呵，等你你分清楚代码和语句的差别，就不会有这个感概了

我做了个查询窗口打开时怎么会闪闪动，而别的入库窗口就不会这样。这是怎么回事？

 

不过为什么最后的逻辑属性设置为False了，这个表还是不能编辑呢？

 

此主题相关图片如下：qq1.png

设置为True，才不能编辑和保存的吧？

要禁止编辑，可以在设计窗口的时候，将Table控件的允许编辑属性设置为False

我设置的这个窗口的afterload事件的代码为：

Tables("清单查询修改_Table1").Fill("Select [_Identify], 材料编码, 材料名称, 型号规格, 单机量, 装入位号, 分工 From {前工序清单} where [清单编号] = '" & Tables("清单列表").Current("清单编号") & "'" ,"技术文件", False)

 

那按道理这个表应该是可以编辑才对的啊，现在却是不能编辑，奇怪了

要编辑：

 

Tables("清单查询修改_Table1").Fill("Select [_Identify], 材料编码, 材料名称, 型号规格, 单机量, 装入位号, 分工 From {前工序清单} where [清单编号] = '" & Tables("清单列表").Current("清单编号") & "'" ,"技术文件", False)

Tables("清单查询修改_Table1").AllowEdit = True

 

不要编辑：

 

Tables("清单查询修改_Table1").Fill("Select [_Identify], 材料编码, 材料名称, 型号规格, 单机量, 装入位号, 分工 From {前工序清单} where [清单编号] = '" & Tables("清单列表").Current("清单编号") & "'" ,"技术文件", True)

Tables("清单查询修改_Table1").AllowEdit = False

 

上面的方法可行，不过为什么已经在fill语句中将逻辑属性设为false了，而Table控件的允许编辑属性也已经设置为true了，但还需要  Tables("清单查询修改_Table1").AllowEdit = True   这一句代码才能将该表变为可编辑的呢？

Fill之后，原来的属性无效了吧。

Fill之后，原来的属性无效了吧。

一定要注意，如果要生成SQLTable，第二个参数要设置为False，如果要生成SQLQuery，第二个参数则要设置为True，切不可搞混。

SQLQuery型Table

如果Table控件的类型选择为SQlQuery，同样可以使用Select语句从后台提取数据生成Table。
不过和SQLTable类型相比，有三点不同：

1、Select语句可以从多个表取数据。
2、可以不包括主键列
3、生成的Table不能编辑的。

所以SQLQuery和SQLTable的差别，其实就是查询表和数据表的差别。

老大我觉得这个跟你的多多少少有一些矛盾的.