Forms("窗口1").RemoveControl("Table1") Dim t As WinForm.Table t = Forms("窗口1").CreateTable("Table1","表A",true) t.SetBounds(12,12,480,300) Forms("窗口1").AddControl(t) Tables("窗口1_Table1").Fill("select * from {表A}","",False)
以前也碰到过,没敢提出,好像是使用SQL语句加载数据后,再来Fill 就会出错,说是找不到 X列 什么的。 再者,记得增加临时列后再删除,再来 Fill 也会这样提示。