(完整版)RFID技术的应用与研究毕业论文 联系客服

发布时间 : 星期二 文章(完整版)RFID技术的应用与研究毕业论文更新完毕开始阅读e06d0cfd534de518964bcf84b9d528ea81c72f87

3.2市场应用趋势

3.2.1市场产值更高

由于RFID独特的特性及优点,在短短的十多年中,其发展异常迅猛,已经成为世界经济中重要的发展领域之一。据有关权威数据统计显示,射频识别产品在全世界的销量1993年为990万套,1994年就猛增到2030万套,1997年有关产品的销量为9810万套,而在全世界范围内射频产品的销售额,1989年为0.81亿美元,1992年为1.41亿美元、1997年为4.33亿美元,1999年则为6.85亿美元,其中在1992~1999年间射频识别产品在全世界销售额的年平均增长率达25.3%。2000年全球RFID销售额已达9亿美元,预计2005年将达到26.5亿美元,而到2010年前RFID市场将增长255%,全球市场将达3000亿美元。由此可见,射频识别技术具有广阔的市场前景。

第四章 展望与总结

RFID是一项蓬勃发展的技术,射频识别技术在未来的发展中,将更多的结合其他高新技术,如GPS、生物识别等技术,由单一识别向多功能识别的方向发展。同时,还将结合现代通信及计算机技术,实现跨地区、跨行业应用,应用的范围也将更加广阔,相信RFID技术将成为多个行业的必备技术,改进我们的生产生活方式。以RFID技术为核心改进的相关产业,将极大提高各企业、系统的工作效率和管理水平,带动社会经济的发展。

附录 程序代码 窗体代码

Private Sub Form_Load()

Dim a As Date, b As Date, c As Date, d As Date a = #4152013 8:15:30 PM# b = #4152013 10:43:30 PM# c = b - a Text7.Text = c d = \If c > d Then Check2.Value = 0 Else

Check2.Value = 1 End If End Sub

命令按钮“上一辆”

Private Sub Command1_Click()

Dim a As Date, b As Date, c As Date, d As Date a = #4152013 8:15:30 PM# b = #4152013 10:30:30 PM# c = b - a Text7.Text = c d = \If c > d Then

Check2.Value = 0 Else

Check2.Value = 1 End If

Command2.Enabled = True If Adodc1.Recordset.BOF Then Command1.Enabled = False Command2.SetFocus Else

Adodc1.Recordset.MovePrevious End If End Sub

命令按钮“下一辆”

Private Sub Command2_Click()

Dim a As Date, b As Date, c As Date, d As Date a = #4152013 9:20:00 AM# b = #4152013 12:13:30 PM# c = b - a Text7.Text = c d = \If c > d Then Check2.Value = 0 Else

Check2.Value = 1 End If