下面代码不会报错：
Dim b As New SQLCrossTableBuilder("统计表1","aec00000")
b. c
b.AddTable("aec00000","itemcode","aaa00000","code") '添加统计表
'b.AddTable("aaa00000","classcode","aam00000","classcode") '添加统计表
b.HGroups.AddDef("classcode","分类码") '添加水平分组
'b.HGroups.AddDef("classname","分类名称") '添加水平分组
b.VGroups.AddDef("requiredate",DateGroupEnum.none) '添加垂直分组
b.Totals.AddDef("plannum") '添加数量列用于统计
b.VerticalTotal=True
b.Build() '生成统计表
MainTable= Tables("统计表1")
MessageBox.Show("数据分析完毕!","提示",MessageBoxButtons.ok, MessageBoxIcon.Question)
但是，第四行代码如果执行就会报错：见图片
所以问题出在第四行代码：
aaa00000和aam00000通过classcode关联,aam00000包括classcode和classname两列
生成的统计表水平分组为classcode和classname两列，垂直分组为aec00000的requiredate列
统计列为aec00000的plannum列
很早之前版本发布的程序运行正常，不知何故。
此主题相关图片如下：screenshot31.jpg
加好友 
发短信
Post By：2011/7/8 15:07:00 [只看该作者]
