请教按帮助文件上的共用录入窗口编译出错 Post By:2013/10/16 10:24:00 [只看该作者]
在产品基本信息表的 AFTERLOAD 事件上写:
If btname > "" AndAlso btname <> "产品信息" Then For Each c As Winform.Control In e.Form.Controls If c.Bindingfield > "" AndAlso c.Bindingfield.StartsWith("产品信息.") Then c.BindingField = c.BindingField.Replace(""产品信息.", btname & ".") End If Next End If