以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]自定义函数e (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=70943) |
-- 作者:blsu33 -- 发布时间:2015/7/1 22:36:00 -- [求助]自定义函数e 老师, 问个问题,假如一个SQLtable 名字叫“窗口1_table1” “窗口1_table1” 应用自定义函数 e 作为参数传入 代码如下:Functions.Execute("datacol",DataTables("部门档案"),e) 函数是这样的 Dim dt As DataTable=args(0) Dim e As object = args(1) Dim dt1 As DataTable= DataTables("编码规则") Dim dc As DataCol = e.DataCol If dc.Name = "部门编码" AndAlso e.newValue <> Nothing Then Dim fdr As DataRow = dt1.Find("数据表名 = \'" & dt.Name & "\'") If fdr IsNot Nothing Then 假如 Functions.Execute("datacol" 这个自定义函数中 有e.datetable 使用了 那就这Functions.Execute("datacol",DataTables("部门档案"),e) 函数 e.datetable 是datetable("窗口1_table1“) 还是 DataTables("部门档案") |
-- 作者:大红袍 -- 发布时间:2015/7/1 22:38:00 -- 窗口1_table1 |
-- 作者:blsu33 -- 发布时间:2015/7/1 22:39:00 -- 恩 测试结果也是这样的 |
-- 作者:blsu33 -- 发布时间:2015/7/1 22:41:00 -- 这个e 是否可以认为是触发事件的datetable 或 Table |
-- 作者:大红袍 -- 发布时间:2015/7/1 22:42:00 -- 对,e原本是什么,传到任何地方都是一样。 |