包含vb.net万利报表的词条

提示：扫一扫查出行
【扫一扫了解最新限行尾号】
复制提示

fastreport在VB.NET使用

TMemoryStream *s;

try

{

s = new TMemoryStream;

frReport1-SaveToStream(s);

//以下代码为新增报表

Query1-SQL-Clear();

Query1-SQL-Add("insert into tb_report (r_id,r_desc,r_data) Values (报表编号,'报表说明',',:r_data)");

//Query1-ParamByName("r_sql")-AsString = FSQL;

Query1-ParamByName("r_data")-LoadFromStream(s,ftBlob);

Query1-Prepare();

Query1-ExecSQL();

//以下代码为更新报表

Query1-SQL-Clear()

Query1-SQL-Add("update tb_report set r_data=:r_data where r_id=报表编号");

Query1-ParamByName("r_data")-LoadFromStream(s,ftBlob);

Query1-Prepare();

Query1-ExecSQL();

}

__finally

{

delete s;

s = NULL;

}

----------

确实是语言不对啊.因为自己在看你的问题的时候,也尝试自己去做了.不过delphi用这种方法可行,其它的语言应该也不会查到哪去吧~

相关问答

Q1: 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数据集设计器中。

Q2: vb.net报表设置记录行数

Visualbasic代码编辑器没有这个功能，但可以用第三方的编辑软件Emedit来实现这个功能。

1、用Emedit打开*.frm文件。

2、点工具，当前配置属性，然后勾选显示行号即可。

Q3: vb.net 子报表如何和主报表显示在同一页

这样的效果用FineReport报表实现起来非常容易，只要在主报表的模板上，在需要放置子报表的单元格上右击选择“单元格元素|子报表”即插入了子报表，然后绑定子报表所需的数据源，实现让子报表的内容显示在主报表上，然后将整个cpt文件插入vb.net中。

Q4: Vb与报表(一.什么是报表)

报表是企业管理的基本措施和途径，是企业的基本业务要求，报表可以帮助企业访问、格式化数据，并把数据信息以可靠和安全的方式呈现给使用者。简单来说,报表就是通过表格,图表等来对数据的呈现.没有计算机的时候,人们就用纸和笔来对账目进行记录汇总分析等.当计算机出现之后，人们利用计算机处理数据和界面设计的功能来生成、展示报表。计算机上的报表的主要特点是数据动态化，格式多样化，并且实现报表数据和报表格式的完全分离，用户可以只修改数据，或者只修改格式.今后为了提高报表的制作效率,更是出现了专门制作报表的工具. 而在vb中报表的使用整个过程分这个几个阶段. 首先是报表设计器的安装和报表模版的建立其次是报表和数据库的连接最后vb代码的实现

Q5: 如何用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 '调用水晶报表完成后置鼠标为默认形状