主题：临时表设置

在窗口中增加控件“Table1”，不绑定表。

'窗口 AfterLoad
Dim t2 As Table = Tables(e.Form.name & "_Table1")
Dim t12 As DataTable = DataTables(e.Form.name & "_Table1")
t2.AllowEdit = True
t2.Cols.Remove("第一列","第二列","第三列","第四列","第五列","第六列","第七列","第八列","第九列","第十列")
t12.DataCols.Add("字符", Gettype(String))
t12.DataCols.Add("日期", Gettype(Date))
t12.DataCols.Add("逻辑", Gettype(Boolean))
t12.DataCols.Add("整数", Gettype(Integer))
t12.DataCols.Add("双精度小数", Gettype(Double))

在“日期”列输入日期，按回车时会产生警告音，请问哪里出错？