标题：开启内置输入框的通用代码

1楼

blackzhu 发表于：2011/12/5 8:20:00

Tables(e.Form.Name & "_Table1").Cols("到货日期").UsetBuildInEditor = True

老大,只要是窗口表含有日期或者时间的列就开启内置时间输入器的通用代码怎么写?

2楼

狐狸爸爸 发表于：2011/12/5 8:58:00

可以通过这个判断列的数据类型：

Dim t as table = Tables(e.Form.Name & "_Table1")

For each c as Col in t.Cols

if c.DataCol.IsDate Orelse c.DataCol.IsNumeric then

c.UsetBuildInEditor = True

end if

3楼

blackzhu 发表于：2011/12/5 9:10:00

谢谢,明白了.对呀可以这么写,我一直想着怎么判断列名了.

共3 条记录, 每页显示 10 条, 页签: [1]