双11狂欢大促

盲盒赢 定制羽绒服

开启惊喜盲盒，抽取你的专属好礼

— 惊喜奖品抢先看 —

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

用到水晶报表交叉表的问题

2003-12-02 09:11:02 181 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

cxqhust1 墨衍会员 · AI 创作全网分发关注 + 加入社区

演示水晶报表设计概念的官方示例报表列表概述在本文档中，你将获得由技术支持创建的示例报表列表。这些示例报表示范了各种各样的报表创建技巧。目的是示范概念。这些示例报表被完全用文献证明，并且不被技术支持所支援。文档包含了每种应用的描述，及其下载链接。目录示范报表设计的示例报表　　数组示例　　营业日和小时示例　　交叉表示例　　日期和时间示例　　格式化和文本示例　　公式示例　　图表示例　　组和深化示例　　标签示例　　参数示例　　子报阅读详情

我想设计如下的统计表：

学号姓名英语数学。。。。。

001 xx 90 80 。。。。。
002 xx 80 80 。。。。。

现在采用的办法是用交叉表，但是不能有“学号”，只能有如下的样子，怎么解决呢，谢谢! BTW:交叉表导出那些线框还在吗？

姓名英语数学。。。。。

xx 90 80 。。。。。
xx 80 80 。。。。。

...全文

H2O到OmniH2O细节解读，人形机器人遥操作的技术演进与哲学摘要：CMU何泰然团队相继发表的H2O和OmniH2O论文为人形机器人遥操作领域带来突破。H2O首创Sim-to-Data方法，通过形态/动作重定向和特权筛选处理人类动作数据，PPO算法实现基础控制。OmniH2O改进为教师-学生蒸馏框架，采用DAgger算法增强泛化能力，并消除对线速度输入的依赖。这两项工作从概念验证到工程落地，建立了一套完整的动作学习范式，为具身智能研究提供了重要参考。阅读详情

cxqhust1

.NET社区 62,274 成员 668,968 内容

+ 关注 + 加入社区

切换为时间正序

cxqhust1 2003-12-02

打赏
举报

谢谢!
To X_Pan(滨海浪子) : 你的代码段可以画线吗?我不会VB.NET.
请问有可能把交叉表导出还保留线框吗?

X_Pan 2003-12-02

打赏
举报

用如下过程即可，

CREATE PROCEDURE P_CrossTab --交叉表生成器
@vSourceTAB As Varchar(200), --数据来源表,可以为表,视图,或者SQL语句(要用括号以及别名:如上注释段)
@vGroupbyField As Varchar(1000), --被selct Group By 要显示出来的,可以多个字段(记录可以有空值)
@vTransFormCol As Varchar(500), --交叉表中的合计等函数计算值的字段
@vFunction As Varchar(500)='Sum', --默认值,交叉表中的函数,也可以是' 2*Sum'的计算公式
@vPivotCol As Varchar(500), --要转换成列的字段,唯一列,可以是表达式'Field1+Field2'(记录可以有空值)
@vStrWhere As Varchar(1000)=null,--Where 约束条件,可以为空
@AggreGate as Varchar(1000)=null--聚集列，不会放到groupby里面
AS
Declare @StrSql As Varchar(8000) --//总的SQL语句
Declare @StrSql2 As Varchar(8000)--//怕varchar(8000)不够长,我就遇到超过8000的问题
Declare @StrSql3 As Varchar(8000)--//加长总SQL语句
Declare @StrSql4 As Varchar(8000)--//加长总SQL语句
Declare @StrSql5 As Varchar(8000)--//加长总SQL语句
Declare @StrSum As Varchar(650) --//列合计
Declare @pCols As Varchar(8000)
Declare @StrWhere As Varchar(1000)
IF Rtrim(Ltrim(IsNull(@vStrWhere,''))) <> ''
Begin
Set @StrWhere=' Where ' + @vStrWhere + ' '
End
Else
Set @StrWhere=''
Execute('Declare CursorCross Cursor For
Select Distinct ' + @vPivotCol + ' From ' +@vSourceTAB+' '+@StrWhere+' Order By ' + @vPivotCol + ' For Read only ')
Begin
Set Nocount On
Set @StrSql =' '
Set @StrSql2=' '
Set @StrSql3=' '
Set @StrSql4=' '
Set @StrSql5=' '

Open CursorCross
While (0=0)
Begin
Fetch Next From CursorCross Into @pCols
IF (@@Fetch_Status<>0) Break
IF @pCols Is Null --//不为空值,
Set @pCols='Null'
--为了防止新创建的列的标题名称,与@vGroupbyField中的字段重名,
--新创建的列的标题名称都增加前缀[@vGroupbyField.新创建的列的标题名称]
--因Sql长度限制Max=8000,由源数据控制字段值不能为Null,因此这里不再检验值是否为Null
if len(@StrSql)>6000 and len(@StrSql2)>6000 and len(@StrSql3)>6000 and len(@StrSql4)>6000 and len(@StrSql5)<6000
Set @StrSql5=@StrSql5+',' + @vFunction +
'(Case '+@vPivotCol+' When ' + ''''+@pCols+''''+ ' Then '+@vTransFormCol +' End) As'+'['+@pCols+']'
if len(@StrSql)>6000 and len(@StrSql2)>6000 and len(@StrSql3)>6000 and len(@StrSql4)<6000
Set @StrSql4=@StrSql4+',' + @vFunction +
'(Case '+@vPivotCol+' When ' + ''''+@pCols+''''+ ' Then '+@vTransFormCol +' End) As'+'['+@pCols+']'
if len(@StrSql)>6000 and len(@StrSql2)>6000 and len(@StrSql3)<6000
Set @StrSql3=@StrSql3+',' + @vFunction +
'(Case '+@vPivotCol+' When ' + ''''+@pCols+''''+ ' Then '+@vTransFormCol +' End) As'+'['+@pCols+']'
if len(@StrSql)>6000 and len(@StrSql2)<6000
Set @StrSql2=@StrSql2+',' + @vFunction +'(Case '+@vPivotCol+' When ' + ''''+@pCols+''''+ ' Then '+@vTransFormCol +' End) As'+'['+@pCols+']'
if len(@StrSql)<6000
Set @StrSql=@StrSql +',' + @vFunction +'(Case '+@vPivotCol+' When ' + ''''+@pCols+''''+ ' Then '+@vTransFormCol +' End) As'+'['+@pCols+']'

End
Close CursorCross
Deallocate CursorCross

-- print ('Select '+@vGroupByField+' '+@StrSql2)+@StrSql+' From '+@vSourceTAB+' '+@StrWhere+' Group By '+@vGroupByField)
--print @strsql3

if @AggreGate is null
Execute(' Select '+@vGroupByField+' '+@StrSql+@StrSql2+@StrSql3+@StrSql4+@StrSql5+' From '+@vSourceTAB+' '+@StrWhere+' Group By '+@vGroupByField)
else
Execute(' Select '+@vGroupByField+','+@AggreGate+' '+@StrSql+@StrSql2+@StrSql3+@StrSql4+@StrSql5+' From '+@vSourceTAB+' '+@StrWhere+' Group By '+@vGroupByField)

IF @@Error <>0
Return @@Error
Return 0
End

tnt8csdn2000 2003-12-02

打赏
举报

在数据链接的时候，用学号来链接，选择行值时用姓名。

导出时线是没有的。

ZXYSOSO 2003-12-02

打赏
举报

你用报表的精灵一步一步试下
行是姓名，列是课目，值是分数。

cxqhust1 2003-12-02

打赏
举报

呜呜呜,没人碰到过吗?

✦双11狂欢大促✦

用到水晶报表交叉表的问题

相关推荐

双11狂欢大促