用PDF417动态库可生成2维条码
站在用户的角度思考问题，与客户深入沟通，找到松岭网站设计与松岭网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：网站设计制作、做网站、企业官网、英文网站、手机端网站、网站推广、域名申请、虚拟空间、企业邮箱。业务覆盖松岭地区。
阅读直接用2维条码扫描枪即可读出数据，然后还原数据
有个二维条码演示应用小软件，可参考
可以使用专门制作二维码的软件进行设置V6.5.3的也行，就不用写什么代码了，简单又省事。
大小的话直接在在图形属性基本中就可以调整二维码的外观。
这个要看扫描枪的通讯接口和通讯协议，以及接口程序是否支持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
