可以通过这个判断列的数据类型：
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
next
加好友 
发短信
Post By：2011/12/5 8:58:00 [显示全部帖子]
