以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  请教：自定义函数初级问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=78189)

--  作者：bahamute --  发布时间：2015/12/3 17:21:00 --  请教：自定义函数初级问题 新手请教函数的问题，经常要设置窗口表数据居中，所以想做一个函数， 不知该如何传参数，求指点。 以下为按钮事件，如何做成函数？ Dim t As Table = e.Form.Controls("Table1").Table if t. rows.count > 0 then    For Each c As Col In t.cols           c.TextAlign = TextAlignEnum.Center    Next End if

--  作者：大红袍 --  发布时间：2015/12/3 18:03:00 --   调用 Functions.Execute("函数名", e.Form.Controls("Table1").Table) -------------- Dim t As Table =  args(0) if t. rows.count > 0 then    For Each c As Col In t.cols           c.TextAlign = TextAlignEnum.Center    Next End if