以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]在table中勾选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90963)

--  作者:clchen
--  发布时间:2016/9/26 15:39:00
--  [求助]在table中勾选
如何实现在 窗体1table1 中实现勾选后,点击按钮 进入到另一个窗体中并将值带入到 窗体2的table2 中,两者只有个别字段是相同的
--  作者:有点蓝
--  发布时间:2016/9/26 15:51:00
--  
1、用全局变量保存勾选的row,窗体2打开后获取全局变量然后赋值

2、如果2个窗口都在打开状态,窗体2打开后直接读取窗体1table1的内容

For Each r As Row In Tables("窗体1_table1").GetCheckedRows
    dim dr as row = Tables("窗体2_table2").AddNew
    dr("第一列") = r("第一列")
    ......
Next

--  作者:clchen
--  发布时间:2016/9/26 15:55:00
--  
用全局变量保存勾选的row,窗体2打开后获取全局变量然后赋值
这个要怎么获取 和赋值啊???

--  作者:有点蓝
--  发布时间:2016/9/26 16:22:00
--  
保存
vars("rows") = Tables("窗体1_table1").GetCheckedRows


获取
For Each r As Row In vars("rows")
    dim dr as row = Tables("窗体2_table2").AddNew
    dr("第一列") = r("第一列")
    ......
Next

--  作者:clchen
--  发布时间:2016/9/26 16:39:00
--  
我在窗体1table1 中AfterCheckRow事件写保存 
然后在窗体2table2 中的 加载事件写获取 
这样为什么会保存呢???

.NET Framework 版本:2.0.50727.8745
Foxtable 版本:2016.7.8.1
错误所在事件:窗口,收票,AfterLoad
详细错误信息:
未将对象引用设置到对象的实例。

图片点击可在新窗口打开查看此主题相关图片如下:9d75slgqdvu59l)nb5%0dq.png
图片点击可在新窗口打开查看




--  作者:有点蓝
--  发布时间:2016/9/26 16:55:00
--  
其它代码放到循环外面
if vars("rows") isnot nothing then
For Each r As Row In vars("rows")
    dim dr as row = Tables("收票_table1").AddNew
    dr("品名") = r("料号")
Next
end if

--  作者:clchen
--  发布时间:2016/9/26 17:21:00
--  
还是报错啊

图片点击可在新窗口打开查看此主题相关图片如下:8smpzyh)f6qqektx5rae4yh.png
图片点击可在新窗口打开查看

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

图片点击可在新窗口打开查看此主题相关图片如下:fbp5na493m@xahfjpvcub4n.png
图片点击可在新窗口打开查看



[此贴子已经被作者于2016/9/26 17:23:48编辑过]

--  作者:有点蓝
--  发布时间:2016/9/26 17:37:00
--  
自己看看vars("_rows")存储的是什么东西
--  作者:clchen
--  发布时间:2016/9/26 17:48:00
--  
获取的值 是什么??
图片点击可在新窗口打开查看此主题相关图片如下:12.png
图片点击可在新窗口打开查看

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


--  作者:有点蓝
--  发布时间:2016/9/26 17:58:00
--  
调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm

看是那一句代码的问题