[求助]如何批量生产有相同内容列的行 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

此主题相关图片如下：发货2.png

大神好！如图，我同样一个经销商会发货很多台编号不同的设备，如果每台设备一台一台输入会很繁琐。请教应该怎么样做到在同一个窗口里面，经销商的信息只输入一次，需要发货的设备从库存里面去选择，然后对库存设备的已发货设备做出标记。

谢谢！

上传一下我的程序

下载信息 [文件大小：下载次数： ]
点击浏览该文件:foxtable项目.rar

[此贴子已经被作者于2015/6/22 22:32:27编辑过]

专家们都上班了，顶一顶

红老大，不懂啊！

把这个语句写进循环里面？

另外我应该怎么样去从库存信息的表里选择我需要发货的制造编号？

红老大，不懂啊！

把这个语句写进循环里面？

另外我应该怎么样去从库存信息的表里选择我需要发货的制造编号？

红老大，您把程序修改成制造编号那里可以选择库存表中的未标记发货的部分设备，但是我的保存按钮（发货信息添加窗口中的按钮）应该怎么样编写click事件来完成如下三个功能：

1. 将库存信息表里的相应信息（在窗口中选择的那些发货编号行信息）对应填入发货信息表中。

2. 将库存信息表里的这部分发货编号的对应是否发货列打勾。

3. 将库存信息表内的数据和发货信息表的数据产生某种关联，即，如果删除了发货信息表中的某一行，库存信息表对应制造编号的那一行的是否发货列取消打勾。

另外还想在制造编号的下拉选择那里增加一些内容不知道怎么弄，我仿照之前您在我另外一个帖子里写的代码在不同的列中间增加&符号，没有用。

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

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

下载信息 [文件大小：下载次数： ]
点击浏览该文件:foxtable项目.rar

[此贴子已经被作者于2015/6/23 21:17:17编辑过]

谢谢老大，这样我可以依葫芦画瓢了

还有个事情请教一下，现在我对代码中的，特别是括号中的一个’引号，两个”引号有点困惑。

比如其中一句

Dim dr = DataTables("制造信息").Find("产品基本信息_制造编号 = '" & e.form.controls("TextBox2").text & "' and _Identify <> " & Tables("制造信息").Current("_Identify"))

都不知道是怎么对应的，一般想制造信息两边的双引号我知道，对于类似的字符都是双引号的。有没有章节专门对这样做说明？

先写

Dim dr = DataTables("制造信息").Find("产品基本信息_制造编号 = '4-1' and _Identify <> '1'")

然后写

Dim dr = DataTables("制造信息").Find("产品基本信息_制造编号 = '" & 变量 & "' and _Identify <> '" & 变量 & "'")

最后写

Dim dr = DataTables("制造信息").Find("产品基本信息_制造编号 = '" & e.form.controls("TextBox2").text & "' and _Identify <> '" & Tables("制造信息").Current("_Identify") & ”’“)

其实我是想理解一下每个 ’ 和每个 ” 的用法。看起来两个' ' 和" "都是相互对应的。现在的迷惑是有点搞不清那些地方是用单引号，那些地方用双引号。

另外，

红老大，你在发货信息（添加）窗口的制造编号控件CheckedComboBox1中设置了enter事件：

e.Sender.ComboList = DataTables("库存信息").GetComboListString("产品基本信息_制造编号", "产品基本信息_是否发货 = false")

这个事件让我能在窗口中点击CheckedComboBox1的时候可以选择库存信息表中的内容。下来菜单弹出一个逻辑选择框和具体的制造编号。我想把这一句依葫芦画瓢，在显示制造编号前面加一个显示机型，所以尝试着写了下面两种语句都没成功。

e.Sender.ComboList = DataTables("库存信息").GetComboListString("产品基本信息_机型" And "产品基本信息_制造编号", "产品基本信息_是否发货 = false")

e.Sender.ComboList = DataTables("库存信息").GetComboListString("产品基本信息_机型" & "产品基本信息_制造编号", "产品基本信息_是否发货 = false")

红老大，按照你的两端分别添加进enter和按钮都搞定了，谢谢！

这种是用下来菜单的方式来选择。如果我的制造编号有好几千个就不方便了，如果用表格的形式应该怎么去做，还需要方便的筛选

主题：[求助]如何批量生产有相同内容列的行