| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]如何在动态函数中使用e参数 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=32071) |
| -- 作者：lyq -- 发布时间：2013/4/25 11:19:00 -- [求助]如何在动态函数中使用e参数 比如e.row方式如何调用... |
| -- 作者：Bin -- 发布时间：2013/4/25 11:20:00 -- 直接把e.row 传进去 作为参数使用. |
| -- 作者：lyq -- 发布时间：2013/4/25 11:21:00 -- 报错，不能直接调用的 |
| -- 作者：lyq -- 发布时间：2013/4/25 11:23:00 -- 报错："e" 是 "private", 因此它在上下文中不可访问 |
| -- 作者：狐狸爸爸 -- 发布时间：2013/4/25 11:28:00 -- 呵呵，没有道理不可以的，你做个简单例子发上来看看 |
| -- 作者：jspta -- 发布时间：2013/4/25 11:29:00 -- 以下是引用lyq在2013-4-25 11:23:00的发言：
报错："e" 是 "private", 因此它在上下文中不可访问 函数是可传递参数的，比如函数ERows(e.row)
那么对于函数内部，e.row对应于参数args（0） 你在函数内部就变成： dim r as row = args（0） 此时r就与E.ROW一样了 你可以再看看关于函数的章节 |
| -- 作者：lyq -- 发布时间：2013/4/25 11:50:00 -- 能否写个简单代码：具体执行 A表,字段a,b,c 计算：c=a+b 通过6楼方法如何写，谢谢 |
| -- 作者：Bin -- 发布时间：2013/4/25 12:08:00 -- 清注意查看帮助 http://www.foxtable.com/help/topics/1486.htm 你把e.row传进去 Functions.Execute("函数名",e.row) 在函数里面 args（0） 就相当于 e.row
|
| -- 作者：ybil -- 发布时间：2013/4/25 12:38:00 -- 以下是引用lyq在2013-4-25 11:50:00的发言：
能否写个简单代码：具体执行 A表,字段a,b,c 计算：c=a+b 通过6楼方法如何写，谢谢 哈哈,我也学会了: 步骤一: 自定义函数,名字如 [DCBH]: Dim drn As DataRow = args(0) drn("c") = drn("a") + drn("b") 步骤二: 设DataColChanged事件: Select Case e.DataCol.Name Case "a" ,"b" \'如果是A列的内容变动 Functions.Execute("DCBH",e.DataRow) \'把e.DataRow传递给自定义函数,让它执行. End Select [此贴子已经被作者于2013-4-25 12:44:47编辑过]
|
| -- 作者：ybil -- 发布时间：2013/4/25 12:48:00 -- 下面的就不行: 步骤一: 自定义函数,名字如 [DCBH]: Dim drn As DataRow = args(0) 步骤二: 设DataColChanged事件: Select Case e.DataCol.Name Case "a" ,"b" \'如果是A列的内容变动 Dim dr as Datarow = Functions.Execute("DCBH",e.DataRow) \' dr("C") = dr("a") +dr("b") End Select |