以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  设置按钮克隆行 ,数据表和窗体空间显示不一致  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120287)

--  作者:visoni
--  发布时间:2018/6/12 9:15:00
--  设置按钮克隆行 ,数据表和窗体空间显示不一致

设置按钮克隆行 ,数据表和窗体空间显示不一致(如图)

--------------

Dim idx As Integer = Tables("WL").Position
Dim r1 As Row = Tables("WL").Current
Dim r2 As Row = Tables("WL").AddNew
Dim nms() As String = {"BM","MC","GG","DW","ckbm","ckmc","pc","SX","BCL","BRG","BZF"}
For Each nm As String In nms
   r2(nm) = r1(nm)
Next

 --------------

图中“复制”按钮为 克隆当前行
图片点击可在新窗口打开查看此主题相关图片如下:9.jpg
图片点击可在新窗口打开查看

 

 刚刚  规格列 克隆的时候为空白 窗口控件不为空白 且改空间数据 表数据不发生变化(显示空白列 其他控件变化会联动)

 


图片点击可在新窗口打开查看此主题相关图片如下:10.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2018/6/12 9:25:47编辑过]

--  作者:有点甜
--  发布时间:2018/6/12 9:45:00
--  

试试改成

 

SystemReady = False

For Each nm As String In nms
   r2(nm) = r1(nm)
Next

SystemReady = True


--  作者:visoni
--  发布时间:2018/6/12 11:30:00
--  

还是不行 老师!!


图片点击可在新窗口打开查看此主题相关图片如下:10.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2018/6/12 11:32:10编辑过]

--  作者:有点甜
--  发布时间:2018/6/12 11:46:00
--  
上传具体例子测试。代码看不出问题。
--  作者:visoni
--  发布时间:2018/6/12 17:32:00
--  

怎么传 我用的SQL做的数据库

 


--  作者:有点甜
--  发布时间:2018/6/12 17:38:00
--  
以下是引用visoni在2018/6/12 17:32:00的发言:

怎么传 我用的SQL做的数据库

 

 

代码不应该有问题的。看看是不是你窗口click、textchanged等事件有影响的代码(全局的窗口事件)

 

你可以单独做一个窗口,然后测试代码,不应该有问题的。