我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net怎么做报表,vb 制作报表并打印

如何用VB.NET做水晶报表?

CrystalReportViewer

站在用户的角度思考问题,与客户深入沟通,找到肥西网站设计与肥西网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:做网站、成都网站设计、企业官网、英文网站、手机端网站、网站推广、国际域名空间、网页空间、企业邮箱。业务覆盖肥西地区。

dataset 定义数据源

.rpt 文件描述具体报表样式

再加一个调用报表的FORM,就可以实现简单的报表功能

Option Explicit

dim Report as New Cystal1

Private Sub Form_Load()

 Screen.MousePointer = vbHourglass

 '调用水晶报表时置鼠标为沙漏状 CRViewer91.ReportSource = Report '该语句的赋值将在后面被修改

 CRViewer91.ViewReport

 Screen.MousePointer = vbDefault '调用水晶报表完成后置鼠标为默认形状

End Sub

Private Sub Form_Resize()

 CRViewer91.Top = 0

 CRViewer91.Left = 0

 CRViewer91.Height = ScaleHeight

 CRViewer91.Width = ScaleWidth

End Sub

vb中怎么做报表?

核心代码:Requery方法!

也可以直接使用ADODB.Recordset!不使用DataEnvironment!例:

...

public adoRecordsetX as ADODB.Recordset

...

Private Sub DataReport_Initialize()

adoRecordsetX.Requery

Set DataReport1.DataSource = adoRecordsetX '设置 DataReport 的数据源

...

'绑定某字段

Me.Sections.Item("Section1").Controls.Item("text1").DataField=adoRecordsetX.Fields.Item(0).Name

...

End Sub

wuxiaoqiang的意见:

在你们有关上述问题的回答,我想再增加一种更简单的解决办法。

1.在datareport 报表中设置datamember和datasource为空。

2.将以前绑定的RptTextBox的datamember设为空,保留原来的datafield.

3.在打印操作中增加以下代码:

Dim db As Connection

Set db = New Connection

db.CursorLocation = adUseClient

db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" + App.path + "\finance.mdb" + ";"

Set tb = New Recordset

tb.Open "select * from dailyfeeprint", db, adOpenStatic, adLockOptimistic

With tb

.AddNew

![工号] = Combo1(0).Text

![姓名] = txtFields(0).Text

![交费日期] = txtFields(1).Text

.........

.Update

End With

Set data1.Recordset = tb

Set datareport1.DataSource = data1

datareport1.Show

datareport1.PrintReport

VB.net中如何制作水晶报表?

这个专业我也学得不是很好,用书上得例子吧。

某公司尽力需要了解公司在全国各地得销售情况,设计一个水晶报表。统计个地区得销售总额和全国总额

准备工作

用 SQL server 2000 创建一个数据库company 在该数据库中创建一个表Sales.用于储存区域销售数据

在表Sales 中添加若干条记录

设计报表

打开 Visual Studio.NET创建名为 Salesreport得 WINDOWS应用程序 将Form1.cs 名更改为 frmSalesReport.cs

frmSalesReport窗体得属性设置里。 吧 frmSalesReport.cs得Text属性更改为"区域销售报表"

把NAME属性更改为frmSalesReport。

在 VisualStudio.NET 菜单中选择 项目添加新项。在"添加新项"窗口得“类别”区域扩展 “本地项目项”,选择数据,在"模板"区域选择"数据集" 在"名称"那将Dataset1.xsd改名 SalesDetaset.xsd

单击"打开" 将生成一个新得结构文件 SalesDataset.xsd 该文件将显示在 ADO.NET数据集设计器中。


文章题目:vb.net怎么做报表,vb 制作报表并打印
当前路径:http://mswzjz.cn/article/dsioegi.html

其他资讯