原帖由 lijinshui 于 2009-4-23 10:06 发表
'about to create Numberbox
set desc = Description.Create()
desc("swftypename").Value = "Report.System.Contrals.ExEdit"
For i = 1 to 30
desc("swfname path").Value = "NumberBox,f"& i ...
'about to create Numberbox
set desc = Description.Create()
desc("swftypename").Value = "Report.System.Contrals.ExEdit"
For i = 1 to 30
desc("swfname path").Value = "NumberBox,f"& i & ",tablePage1,tabControl1;....." '后面的值你看吧,我看不到了
SwfWindow("报表系统").SwfObject(desc).Set i
next
'你自己调试一下,我没有测试