既然有人希望实现这种页面布局,那么我就把例子放出来吧.(更新关闭标签,自动靠拢) - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim mdm As New MultiDataMap
mdm.add("0|2012|2010-2012年农村初中改造建设")
mdm.add("1|2012|2012年食堂建设")
mdm.add("2|2012|2012年寄宿制建设")
mdm.add("3|2012|2010-2012年薄弱学校改造建设")
mdm.add("4|2012|2012年教师周转宿舍建设")
mdm.add("5|2012|2010-2012年校舍安全工程")
mdm.add("6|2012|2011-2012年学前教育建设")
mdm.add("7|2012|2011-2012年校舍维修")
mdm.add("8|2012|2012年上级专项资金")
mdm.add("9|2012|2012年县级配套")
mdm.add("10|2012|2012年其他")
mdm.add("11|2013|2013年教师周转宿舍建设")
mdm.add("12|2013|2013年农村初中改造建设")
mdm.add("13|2013|2013年薄弱学校改造建设")
mdm.add("14|2013|2013年食堂建设")
mdm.add("15|2013|2013年寄宿制建设")
mdm.add("16|2013|2013年学前教育建设")
mdm.add("17|2013|2013年上级专项资金")
mdm.add("18|2013|2011-2012年校舍维修")
mdm.add("19|2013|2013年教育附加")
mdm.add("20|2013|2013年其他")
mdm.ValueCol = 0
mdm.DisplayCol = 1
Tables("建设项目").Cols("资金安排").DataMap = mdm.CreateDataMap()

主题：既然有人希望实现这种页面布局,那么我就把例子放出来吧.(更新关闭标签,自动靠拢)