VB报表输出的问题恳请不吝赐教

2016-01-29 12:41 17 1 收藏

VB报表输出的问题恳请不吝赐教,VB报表输出的问题，恳请不吝赐教

【 tulaoshi.com - ASP.NET 】

各位老大：
我有个小问题：
我用ACCESS2000 +VB6 ADO 编程，输出一个客户定单明晰的报表
期望的格式如下：
客户编号：12345 客户名称张三
定单编号 00000001 日期：2005/01/01 单价￥5 数量 10 金额￥50
定单编号 00000002 日期：2005/01/02 单价￥15 数量 20 金额￥300
金额：350
客户编号 23456 。。。
。。。
用到的表是Customer和Ordermaster
其中字段包括：
CustomerID,CustomerName ,OrderID(定单号) OrderDate,Price,OrderNum,TOTAL..
我指定的数据源是:set rstrpt.Source ="SELECT Customer.CustomerID,Customer.CustomerName, Ordermaster.OrderID, Ordermaster.Price,Ordermaster.Number,Ordermaster.Total " & _
"FROM Customer INNER JOIN Ordermaster "& _
"ON Customer.CustomerID =Ordermaster.CustomerID "
"WHERE Ordermaster.CustomerID = Customer.CustomerID "
sql 的语法应该没有错，编译是通过了的，
我在data report 中做了分组分组头中放了客户ID 及客户名称
分组注脚中放了金额合计
但是总是显示报表部分与数据源不匹配
我没有用数据环境直接拖动那样生成，我觉得用代码更快些，不知道哪弄的不对，请各位大虾不吝赐教谢谢了~~！！

来源:http://www.tulaoshi.com/n/20160129/1487147.html

看过《VB报表输出的问题恳请不吝赐教》的人还看了以下文章更多>>

在VB通过vsreport运用ACCESS地报表

标签：编程语言网络编程

在VB中也可使用ACCESS的报表通过vsreport这个控件，你完全可以使用ACCESS来设计好报表，然后在VB中调用这些报表，效果与你直接在ACCESS调用报表一样。 VB的报表一直是它的弱项，在以前很长一段时间我都是使用这个方法来做报表的,因为有段时间曾经帮香港的朋友做了几个VB的系统，但他们比较喜欢ACCESS的报表，所以使用这个方法...

VB6中动态设置报表结果

标签：编程语言网络编程

在VB6的报表使用过程中,我们会发现这样的一个问题,那就是报表中的数据只能读一次,不管你的库中字段增加也好,删除也好,以及让它显示新的查询结果等,它都不会记变。经过查资料才搞清楚,原来是DataEnvironment的问题.原来,只要Command对象中含有数据记录集合,它就不会重新执行SQL语句，就算是把新的查询语句给DataEnvironment后它也不会执行，解决...

在VB6.0中实现动态统计报表

标签：编程语言网络编程

在利用VB开发MIS系统的过程中,经常需要制作动态统计报表。本文就如何实现动态数据源下的分组交叉统计报表进行阐述，并结合实例给出编程指导。在VB6.0的数据环境设计器中,我们可以利用“添加命令”一项来连接报表所需的数据源,同时利用“添加命令”属性中的分组与合计功能设计分组交叉统计报表的数据源,至此我们可以设计简单的数据存在...

VB图像处理之像素的获取和输出

标签：编程语言网络编程

要处理一个图像，首先要获得该图像的像素值，而VB本身提供的PICTURE控件虽然可以打开很多类型的图片，但是它提供的那个POINT方法读取像素实在是太慢。而使用GetPixel这个API的速度也快不到哪里去，因为PIONT方法本身就是对于GetPixel的一个包装。在VB中要快速获取一幅在PICTURE中打开的图像比较快速的方法是使用DIB方法，当然还有DDB...

在vb中动态加载水晶报表rpt文件的方法

这个问题在很多论坛里边都有问到。但是一直没找到满意的答案。下边写出一个解决办法 Dim sql As String Dim rstLiuShui As New ADODB.Recordset Dim Rpt As New CRAXDDRT.Report Dim PrintApp As New CRAXDDRT.Application If Option2.Value = True Then sql = "select * from n_ihbill where datediff(d,日期,'" & Format(DTPicker1.V...

查看更多精彩>>