以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何设计这样的送货单窗口  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=23024)

--  作者:tsjmq
--  发布时间:2012/8/30 17:20:00
--  如何设计这样的送货单窗口

新手有很多不懂,所以希望能详细解释一下怎么实现下面这个窗口…非常感谢…

窗口中有表A和表B

表A显示“产品记录”表里筛选过的状态是“未送货”的产品

表B是新建的空白送货单

然后双击A中的行时,B中就会添加相同的一行,同时A中该行消失

双击B中的行时就刚好相反

然后有一个“打印送货单”的按钮,能自动把表B中所有的行打印成送货单

等打印结束后,B中的的行的状态才变成“已送货”


--  作者:狐狸爸爸
--  发布时间:2012/8/31 9:51:00
--  

都可以简单实现,先看帮助文件学习吧:

 

图片点击可在新窗口打开查看

 

看帮助一定要按顺序,头一两遍可以不求甚解,第三遍开始要将每个例子实际操作演练一遍,不明白的就上论坛求助。三遍之后才开始做系统,遇到问题在帮助找答案,找不到的在论坛提问。
此外一定要先掌握《使用指南》,然后再看《开发指南》


--  作者:arnonho
--  发布时间:2022/5/29 23:52:00
--  
这个功能实现了吗?
--  作者:狐狸爸爸
--  发布时间:2022/5/30 7:01:00
--  
这不很简单吗?
1、DoubleClick事件:

2、复制数据

结合一下,例如双击将表A的行复制到表B,同时在表A删除此行,在表A的DoubleClick事件写代码:

e.Cancel = True
Dim dr As DataRow = DataTables("表B").AddNew
For Each dc As DataCol In DataTables("表B").DataCols
    dr(dc.Name) = e.DataRow(dc.Name)
Next
e.DataRow.Delete()

必须先按顺序学习,老想着我有个问题,别人给我一段代码,那么永远学不会的。

正确的打开方式是:按顺序看两遍帮助,帮助各种例子都实际操作一遍,然后才开始做系统,不会的就查帮助,帮助查不到的到论坛提问。
[此贴子已经被作者于2022/5/30 7:03:19编辑过]