在datagrid1 中没有显示sum(sum(受理保费)) 中的内容，如何解决？

[cyo]

Private Sub Command1_Click()
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.ConnectionString = "dsn=hgsql;uid=sa;pwd=o4w5n6;database=hgprd"
conn.Open

str = "select sum(受理保费) as 受理保费,营业部,区域 from shouli where 受理日期 between " & RTrim(Text1.Text) & " and " & RTrim(Text2.Text) & "group by 营业部,区域 order by 受理保费 desc compute sum(sum(受理保费))"
rs.CursorLocation = adUseClient
rs.Open str, conn, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = rs
End Sub

在datagrid1 中其它的字段都显示出来了，就是没有显示sum(sum(受理保费)) 中的内容，如何解决？