vb点虐 地图报表 vbnet绘图
如何用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://pwwzsj.com/article/ddgcsog.html