以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 【求助】Button的Click事件 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93761) |
-- 作者:好吧 -- 发布时间:2016/12/6 15:30:00 -- 【求助】Button的Click事件 请问老师,如果我希望单击当前窗口(窗口1)中button按钮,能够将当前窗口中table控件(table1)的数据(也就是绑定表的数据)复制到另一个窗口(窗口2)中的table控件(table2)中,请问老师Button的Click事件代码该怎么写??请老师赐教,谢谢!! |
-- 作者:有点蓝 -- 发布时间:2016/12/6 15:53:00 -- for each r as row in tables("窗口1_table1").rows dim dr as datarow = tables(窗口2_table1).addnew dr("列1") = r("列1") dr("列2") = r("列2") next
|
-- 作者:好吧 -- 发布时间:2016/12/6 16:08:00 -- 我的窗口2中有table1控件啊,为什么会有下面的编译错误?? 编译错误:未声明名称tables(窗口2_table1) |
-- 作者:好吧 -- 发布时间:2016/12/6 16:09:00 -- 编译错误:未声明名称"窗口2_table1" |
-- 作者:有点蓝 -- 发布时间:2016/12/6 16:17:00 -- http://www.foxtable.com/webhelp/scr/1906.htm |
-- 作者:好吧 -- 发布时间:2016/12/6 17:24:00 -- 老师,编译错误:未声明名称"窗口2_table1" 这个错误我还是改不了,请老师帮忙看看,谢谢啦!! [此贴子已经被作者于2016/12/19 20:58:06编辑过]
|
-- 作者:有点蓝 -- 发布时间:2016/12/6 17:32:00 -- 窗口必须打开才能使用窗口里面的控件,所以必须2个窗口都处于打开常态 For Each r As Row In Tables("窗口1_table1").rows Dim dr As DataRow = DataTables("临时表").addnew dr("德国编码") = r("德国编码") dr("料品名称") = r("料品名称") Next |
-- 作者:好吧 -- 发布时间:2016/12/7 9:39:00 -- 老师,我在临时表中加了一列逻辑列,我想有勾到的列才复制过去,代码该怎么改呢?请老师赐教,谢谢!! |
-- 作者:有点蓝 -- 发布时间:2016/12/7 9:56:00 -- For Each r As DataRow In Tables("窗口1_table1").DataTable.Select("逻辑列=true") Dim dr As DataRow = DataTables("临时表").addnew dr("德国编码") = r("德国编码") dr("料品名称") = r("料品名称") Next |
-- 作者:好吧 -- 发布时间:2016/12/7 10:02:00 -- 多谢老师 |