以下是引用狐狸爸爸在2010-6-2 16:33:00的发言：
第一个问题，下次更新后不会再有了。
第二个问题，代码换一下位置：
Dim tb as Table = Tables("窗口3_Table1")
tb.Fill("Select * from 表1","abc",False)
tb.AllowEdit = true
With DataTables("窗口3_Table1")
.DataCols.Add("可发数量", GetType(Double))
.DataCols.Add("可发金额", GetType(Double))
.DataCols("b").Decimals = 6
.DataCols("b").SetFormat("0.000000")
.DataCols("c").Decimals = 6
.DataCols("c").SetFormat("0.000000")
.DataCols("d").Decimals = 6
.DataCols("d").SetFormat("0.000000")
.DataCols("e").Decimals = 6
.DataCols("e").SetFormat("0.000000")
.DataCols("f").Decimals = 6
.DataCols("F").SetFormat("0.000000")
end with
急盼老总的新版，关于第二个问题，可能是我没表达清楚，不是“窗口3”中的小数位数 ，而是在“窗口2”中单击cellbutton打开“窗口3”后，“窗口2”中的小数位数失效了（还包括下拉列表也失效了），如下图。
此主题相关图片如下：aa.gif
[此贴子已经被作者于2010-6-3 13:20:42编辑过]
加好友 
发短信
Post By：2010/6/1 23:56:00 [显示全部帖子]
