我从帮助文件中拷贝出来的代码做实验

打开窗口后一直显示未找到列 XXX

但是我压根就没有这个列，后来检查发现，XXX可能是我编号列内容的前缀，我编号列示字符型，不知道是不是跟这个有关系

这个是代码“

Dim t As Table = Tables("窗口1_Table2")
With Tables("main_table")
    If .Current Is Nothing Then
        t.Filter = "False"
    Else
        t.Filter = "[bianhao_id] = " & .Current("bianhao_id")
    End If
End With

还有一个问题，请教一下，

If CurrentTable.Name = "repair_Table3" Then \'如果当前表是模拟的关联表
    Dim r1 As Row = Tables("main_table").Current
   If r1 IsNot Nothing Then
        e.DataRow("bianhao_id") = r1("bianhao_id")
    End  If
 End  If

我在repair_table增加行的时候，编号ID为空，同样我的编号ID都是字符型，帮忙看看，是不是跟这个有关系，我的理解是代码中引用的是列名称，应该不会跟这个有关系吧，高手指教，谢谢

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目4.rar

If CurrentTable.Name = "窗口1_Table1" Then \'如果当前表是模拟的关联表
   Dim r As Row = Tables("产品").Current
   If r IsNot Nothing Then
        e.DataRow("产品编号") = r("产品编号")
   End If
End If

表B增加行的同时会把表A的bianhao_id填写进去，但是我这个例子中怎么也弄不成