如何用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.NET中向报表传递参数时出错

VB.NET中向报表传递参数时出错

光看这一句的话，没发现问题，问题可能是出现在前面。

显示水晶报表的基本框架是这样的，如下：

'参数字段集合

Dim ParamFields As New ParameterFields

'参数字段

Dim ParamField As ParameterField

'离散值

Dim DiscreteVal As New ParameterDiscreteValue

''创建一个强类型报表实例

crReportDocument = New CrystalReport1

''将Dataset传递给报表

crReportDocument.SetDataSource(dataSet)

''将报表传递给浏览器

CrystalReportViewer1.ReportSource = crReportDocument

这个应该是你需要的，希望能帮到你，另外，如果你是刚刚接触水晶报表的话，关于水晶报表的问题你可以去 阿泰 CSND的BLOG 找找，不知道你有没有听说过，呵呵反正是很强大啦~

鍙傝 冭祫鏂欙细

伭悱吝栉媉升姁唪栿牿珛燀最娘檵

vb点虐 如何嵌入地图

新建一个文件,写入下面的代码:

!doctype html

html

head

meta name="viewport" content="initial-scale=1.0, user-scalable=no" /

meta http-equiv="Content-Type" content="text/html; charset=gbk" /

titleBaidu Map V1.2/title

script type="text/javascript" src=";services=true"

!-- add baidu map api --

/script

/head

body

div id="container" style="width: 600px; height: 400px;"

/div

/body

/html

script type="text/javascript"

var map = new BMap.Map("container");                 // new Map

var point = new BMap.Point(116.397128, 39.916527);      // Location, （经度, 纬度）

map.centerAndZoom(point, 15);                        // show Map

// 添加缩放功能

map.enableScrollWheelZoom();

map.enableKeyboard();

/script

保存到程序exe同一目录下,文件名:map.html

然后BUTTON点击事件:

WebBrowser1.Navigate(Application.StartupPath  "\map.html")

这样就可以了

ps:经纬度可以到百度地图官网去获取

或者到:  去生成代码

网站题目：vb点虐 地图报表 vbnet绘图
链接分享：http://kswjz.com/article/ddgcsog.html