以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助:双击单元格,打开新的窗体,记录窗体内容的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=76312)

--  作者:xianzheng
--  发布时间:2015/10/26 21:30:00
--  求助:双击单元格,打开新的窗体,记录窗体内容的问题
If e.Col.Name = "国税" Then
    e.Cancel = True \'禁止进入编辑状态
    Forms("国税资料窗体").Open()
End If

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20151026212011.png
图片点击可在新窗口打开查看
双击单元格后,打开新的窗体,记录窗口内空跟打开前的内容要一至如何写代码?
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20151026211648.jpg
图片点击可在新窗口打开查看

--  作者:xianzheng
--  发布时间:2015/10/26 21:32:00
--  
If e.Col.Name = "国税" Then
    e.Cancel = True \'禁止进入编辑状态
    Forms("国税资料窗体").Open()
End If
双击单元格后,打开新的窗体,记录窗口内空跟打开前的内容要一至如何写代码?
--  作者:大红袍
--  发布时间:2015/10/26 21:32:00
--  

你记录窗口要绑定副本表才行,如

 

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

 


--  作者:xianzheng
--  发布时间:2015/10/26 22:04:00
--  
Dim rgd As WinForm.RecordGrid = e.Form.Controls("RecordGrid1")
rgd.Table = Tables("国税资料窗体_国税资料") \'指定绑定表
rgd.Build()


提示错误:不存在国税资料窗体 _国税资料的table


--  作者:xianzheng
--  发布时间:2015/10/26 22:04:00
--  
不知道什么原因,求解


--  作者:大红袍
--  发布时间:2015/10/26 22:36:00
--  

试试

 

Dim rgd As WinForm.RecordGrid = e.Form.Controls("RecordGrid1")
rgd.Table = e.Form.Controls("Table1").Table
rgd.Build()