标题：[已解决]【已上传实例】条码如何读取窗体中的副本的数据？

1楼

hanxuntx 发表于：2011/10/23 9:07:00

图片点击可在新窗口打开查看此主题相关图片如下：qq截图未命名.png

请问：

点击菜单按钮“工单修改”

窗口“工单查询”中的表是“工单表”的副本，窗口“订单修改”如何读取“工单查询_Table1”的数据？

[此贴子已经被作者于2011-10-24 11:14:08编辑过]

2楼

狐狸爸爸 发表于：2011/10/23 9:16:00

http://www.foxtable.com/help/topics/2311.htm

3楼

hanxuntx 发表于：2011/10/23 11:33:00

想要的目的，点击菜单按钮“修改订单”能读取窗体中的数据

狐爸帮忙看下，帮助我读了，还是不得要领啊

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

4楼

狐狸爸爸 发表于：2011/10/23 11:39:00

正确的代码是：

If Forms("窗口1").Opened
    For Each c As Winform.Control In e.Form.Controls
        If c.Bindingfield > "" AndAlso c.Bindingfield.StartsWith("表B.") Then
            c.BindingField= c.BindingField.Replace("表B.", "窗口1_Table1.")
        End If
    Next
End If

5楼

hanxuntx 发表于：2011/10/23 11:52:00

狐爸，这个真不行。我确定我测试的时候窗口是打开的。问题不在这里吧

6楼

狐狸爸爸 发表于：2011/10/23 11:57:00

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

7楼

hanxuntx 发表于：2011/10/23 13:09:00

谢谢狐爸，搞定了，原来是条码控件的原因

8楼

hanxuntx 发表于：2011/10/23 13:26:00

If Forms("工单查询").Opened Then
    For Each c As Winform.Control In e.Form.Controls
        If c.name <> "BarCode1" Then    '不加这一句打开窗口会报错，说是集合已经改变，无法枚举
            If c.Bindingfield > "" AndAlso c.Bindingfield.StartsWith("工单表.") Then
                c.BindingField = c.BindingField.Replace("工单表.", "工单查询_Table1.")
            End If
        End If
    Next
End If

e.Form.Controls("BarCode1").Code = e.Form.Controls("TextBox2").value

但是加了，窗口中的条码如何获取值呢？ TextBox2 绑定了表中的“工单ID”字段，条码也是绑定的这个字段

9楼

狐狸爸爸 发表于：2011/10/23 14:32:00

没有明白你的意思，请用例子说话

10楼

hanxuntx 发表于：2011/10/23 15:47:00

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

请帮忙看下

共19 条记录, 每页显示 10 条, 页签: [1] [2]