Help me,关于 DataReport 的

Question

1.RptTextBox 当然可以与数据库的表中的某一字段帮定
  RptTextBox 的 CanGrow 属性为 True2.你可以用 SQL 语句解决
  SQL Server:
SELECT 12345678.91 AS Amount,
      SUBSTRING(RIGHT(12345678.91,11),1,1) AS 千,
      SUBSTRING(RIGHT(12345678.91,10),1,1) AS 百,
      SUBSTRING(RIGHT(12345678.91,9),1,1) AS 十,
      SUBSTRING(RIGHT(12345678.91,8),1,1) AS 万,
      SUBSTRING(RIGHT(12345678.91,7),1,1) AS 千,
      SUBSTRING(RIGHT(12345678.91,6),1,1) AS 百,
      SUBSTRING(RIGHT(12345678.91,5),1,1) AS 十,
      SUBSTRING(RIGHT(12345678.91,4),1,1) AS 元,
      SUBSTRING(RIGHT(12345678.91,2),1,1) AS 角,
      SUBSTRING(RIGHT(12345678.91,1),1,1) AS 分Access:
SELECT FORMAT(12345678.91,'####0.00') AS Amount, 
MID(RIGHT(FORMAT(Amount,'####0.00'),11),1,1) AS 千1, 
MID(RIGHT(FORMAT(Amount,'####0.00'),10),1,1) AS 百1, 
MID(RIGHT(FORMAT(Amount,'####0.00'),9),1,1) AS 十1, 
MID(RIGHT(FORMAT(Amount,'####0.00'),8),1,1) AS 万,
MID(RIGHT(FORMAT(Amount,'####0.00'),7),1,1) AS 千, 
MID(RIGHT(FORMAT(Amount,'####0.00'),6),1,1) AS 百, 
MID(RIGHT(FORMAT(Amount,'####0.00'),5),1,1) AS 十,
MID(RIGHT(FORMAT(Amount,'####0.00'),4),1,1) AS 元,
MID(RIGHT(FORMAT(Amount,'####0.00'),2),1,1) AS 角, 
MID(RIGHT(FORMAT(Amount,'####0.00'),1),1,1) AS 分
FROM YourTableName DataReport 相关技巧:
http://www.playyuer.com 提供
《vb 6之数据报表使用技巧》
http://media.ccidnet.com/media/ciw/871/b1301.htm
《VB6之Data Report全面解决方案(1)》
http://microinfo.top263.net/Txt/DRptPlus.txt
《巧用 VB6 之 Data Report 实现图片(Picture)、图表(MsChart)的打印及预览》
http://microinfo.top263.net/Txt/ImageRpt.txt
下载例程
http://microinfo.top263.net/Zip/DatGrdRpt.zip
http://microinfo.top263.net/Zip/ImageRpt.exe
http://microinfo.top263.net/Zip/FmtDatRpt.zip 
http://microinfo.top263.net/Zip/ShapeTree.zip 
http://microinfo.top263.net/Zip/ShapeNew.zip