以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教按帮助文件上的共用录入窗口编译出错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=41296)

--  作者:vlladz
--  发布时间: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

 

btName 在全局变量上设置为:Public btname As String

 


图片点击可在新窗口打开查看此主题相关图片如下:21.jpg
图片点击可在新窗口打开查看

 

我理解是:刚开始窗口加载的时候 btname 为控制,所以提示错误。

请教解决办法


--  作者:Bin
--  发布时间:2013/10/16 10:26:00
--  
你多了一个双引号 
  c.BindingField = c.BindingField.Replace(""产品信息.", btname & ".")


  c.BindingField = c.BindingField.Replace("产品信息.", btname & ".")

--  作者:vlladz
--  发布时间:2013/10/16 10:30:00
--  

谢了,经常在这些问题上搞错