能在窗口内执行的代码确不能写成函数 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

dim e as object = args(0)

dim ctl as object

For i As Integer = 0 To SelectCtlNames.count - 1

ctl = e.Form.Controls(SelectCtlNames(i))

ctl.BackColor = Color.Transparent

SelectCtlNames.Clear

以上代码主体在窗口的按钮事件中可以正常执行

但如果写到函数中去，则不行提示

---------------------------

错误

---------------------------

编译错误:类型“T”的值无法转换为“String”。

错误代码：ctl = e.Form.Controls(SelectCtlNames(i))

---------------------------

确定

---------------------------

主题：能在窗口内执行的代码确不能写成函数