基于VB的伺服拧紧机数据采集设计

智慧工厂Ｉ　ＳＭＡＲＴ　ＦＡＣＴＯＲＹ　基于ＶＢ的伺服拧紧机数据采集设计　Ｄａｔａ　Ａｃｑｕｉｓｉｔｉｏｎ　Ｄｅｓｉｇｎ　ｆｏｒ　Ｓｅｒｖｏ　Ｔｉｇｈｔｅｎｅｒ　Ｂａｓｅｄ　ｏｎ　ＶＢ　・亚太机电股份有限公司　沈铁军Ｓｈｅｎ　Ｔｉｅｊｕｎ　杭州萧山技师学院　金凌芳Ｊｉｎ　Ｌｉｎｆａｎｇ　顾磊Ｇｕ　Ｌｅｉ　・摘要：现代工业应用ＢｇＰＣ—Ｂａｓｅｄ是一种使用相当广泛的通信方式，通用的上位机组态软件，界面　友好、开发简洁等等优点，目前在ＰＣ监控领域已经得到了广泛的应用，其中Ｖｉｓｕａｌ　Ｂａｓｉｃ在开发可视　化环境下的监控系统时具有其独特的优势以及可视化得界面，尤其是在串行通信方面，为人们读取某　些仪器的数据提供了方便，其配线数少，不需要增加投资，灵活性好，容易实现，特别适合于小规模　的控制系统。本文讲述了一种关于ＶＢ与ＤＤＫ￣ＪＥ拧紧机串行通信，并使用ＤＡＯ模型访问数据，最终　以Ｅｘｃｅｌ输出。　关键词：Ｖｉｓｕａｌ　Ｂａｓｉｃ串行通信伺服拧紧机　Ａｂｓｔｒａｃｔ：ＰＣ—Ｂａｓｅｄ　ｕｓｅｄ　ｉｎ　ｍｏｄｅｒｎ　ｉｎｄｕｓｔｒｙ　ｉｓ　ａ　ｋｉｎｄ　ｏｆ　ｃｏｍｍｕｎｉｃａｔｉｏｎ　ｍｅｔｈｏｄ　ｗｉｄｅｌｙ　ａｐｐｌｉｅｄ　Ｉｔ＇ｓ　ａ　ｕｎｉｖｅｒｓａｌ　ｃｏｎｆｉｇｕｒａｔｉｏｎ　ＳＯｆｌｗａｒｅ　ｆｏｒ　ｍａｓｔｅｒ　ｃｏｍｐｕｔｅｒ，ａｎｄ　ｉｓ　ｗｉｄｅｌｙ　ａｐｐｌｉｅｄ　ｉｎ　ＰＣ　ｍｏｎｉｔｏｒｉｎｇ　ｗｉｔｈ　ａｄｖａｎｔａｇｅｓ　ｏｆ　ｆｒｉｅｎｄｌｙ　ｉｎｔｅｒｆａｃｅ，ｅａｓｙ　ｄｅｖｅｌｏｐｍｅｎｔ，ｅｔｃ．Ｖｉｓｕａｌ　Ｂａｓｉｃ　ｈａｓ　ｉｔｓ　ｕｎｉｑｕｅ　ａｄｖａｎｔａｇｅｓ　ａｎｄ　ｖｉｓｕａｌｉｚａｔｉｏｎ　ｉｎｔｅｒｆａｃｅ　ｗｈｅｎ　ｕｓｅｄ　ｉｎ　ｔｈｅ　ｄｅｖｅｌｏｐｍｅｎｔ　ｏｆ　ｍｏｎｉｔｏｒｉｎｇ　ｓｙｓｔｅｍ　ｉｎ　ｖｉｓｕａｌｉｚａｔｉｏｎ　ｅｎｖｉｒｏｎｍｅｎｔ，ｅｓｐｅｃｉａｌｌｙ　ｉｎ　ｓｅｒｉａｌ　ｃｏｍｍｕｎｉｃａｔｉｏｎ，ｗｈｅｒｅ　ｉｔ　ｓｕｐｐｌｉｅｓ　ｃｏｎｖｅｎｉｅｎｃｅ　ｆｏｒ　ｔｈｅ　ｒｅａｄｉｎｇ　ｏｆ　ｄａｔａ　ｆｒＯｍ　ｓｏｍｅ　ｉｎｓｔｒｕｍｅｎｔｓ．Ｉｔ　ｈａｓ　ｆｅＷ　ｌｉｎｋｉｎｇ　ｗｉｒｅｓ．　ａｎｄ　ｄｏｅｓ　ｎｏｔ　ｎｅｅｄ　ｔｏ　ｉｎｃｒｅａｓｅ　ｉｎｖｅｓｔｍｅｎｔ，ｔｈｅｒｅｆｏｒｅ　ｉｔ＇ｓ　ｆｌｅｘｉｂｌｅ　ａｎｄ　ｅａｓｙ　ｔｏ　ｉｍｐｌｅｍｅｎｔ．Ｉｔ。Ｓ　ｑｕｉｔｅ　ｓｕｉｔａｂｌｅ　ｆｏｒ　ｓｍａｌｌ—ｓｃａｌｅ　ｃｏｎｔｒｏｌ　ｓｙｓｔｅｍｓ　Ｔｈｉｓ　ｐａｐｅｒ　ｉｎｔｒｏｄｕｃｅｓ　ｔｈｅ　ｃｏｍｍｕｎｉｃａｔｉｏｎ　ｂｅｔｗｅｅｎ　ＶＢ　ａｎｄ　ｓｅｒｖｏＴｉｇｈｔｅｎｅｒ，ａｃｃｅｓｓ　ｄａｔａ　ｕｓｉｎｇ　ｔｈｅ　ＤＡＯｍｏｄｅｌ，ｗｉｔｈ　Ｅｘｃｅｌ　ｏｕｔｐｕｔ．　Ｋｅｙｗｏｒｄｓ：Ｖｉｓｕａｌ　Ｂａｓｉｃ　Ｓｅｒｉａｌ　ｃｏｍｍｕｎｉｃａｔｉｏｎ　ＳｅｒｖｏＴｉｇｈｔｅｎｅｒ　【中图分类号】ＴＮ８２０．３【文献标识码】Ｂ文章编号１　６０６—５１　２３（２０１　６）１　２－００９３－０４　１　引言　随着技术的发展，目前很多产品部件的螺栓拧紧联接　采用简易的气动控制，或是手动的力矩扳手来拧紧螺栓，操　作人员的劳动强度大，其次拧紧的力矩准确度如何由当时的　检验人员的主观感觉判断，数据没有可查性。当前很多主机　单位对螺栓的力矩有明确的范围要求，而ＡＣ伺服拧紧机构　实现高精度模块化转矩信号增幅、电传功能以及ＴＯＯＬ．ＩＤ功　参数：波特率９６００，无校验方式，８位数据位，２位停止，　每次拧紧后均会将数据结果发送，其结果输出数据长度７８　字节，见图１所示。　ｌ　２　３　１　５　６　７　Ｂ　ｇ　１０　１１　ｌ２　ｌ３　ｌｌ　ｌ５　Ｉ６　ｉ　Ｏ　Ｏ　０　㈨。。　ｌ　Ｉ　々　０　Ｉ　ｌ意　ｌ　２Ⅲ１　　ｌ２０｝Ｉ　Ｉ：ｌＩＩ｛　Ｉ　１７　。。　２　ｌ８　１９　２０　２ｌ　２２　２＇３　２４　２５　２６　２７　２８　２９　３０　３ｌ　３２　譬　㈨　ｌ　３　４　Ｉ３ｌｌ１　ｉ　ｊ　２　３　㈨　Ｉ　４　Ｉ３ｌＩ。　要　麓　ｌ　２　．　３　∞　鲋　３５　３６　３７　：１９　１０　４ｌ　Ｉ２　１＿｛４，１　４５　．１６　－ｌ７　Ｉ．８　能，进行螺纹紧固，其紧固结果的数据可通过ＲＳ一２３２接口读　４　脆２０ＨＩ　Ｉ｛＿３０ｌＩ。　０　ｌ　　Ｉ追　２　３　ｌ　５７　ｌ。。　蔷萼　｝　…　Ｉ　０　Ｉ　２　３　出，即可满足主机单位力矩要求以及数据可查性。本文提出　了一种由ＤＤＫ伺服拧紧系统来实现螺栓的拧紧，采用ＶＢ上　｛９　５０　５ｌ　船　５３　Ｓ４　５５　５６　５８　５９　６０　６ｌ　６２　６３　０　６　龋　．　６６　１　∞　２　６Ｒ　３　６９　７０　７Ｉ　７２　ｌ　７３　０　７４　．７５　０　７６　７７　７８　位机软件编写控制程序，采集拧紧数据，使数据可以追溯。　Ｉ　粥　｝Ｉｊ　判定　４Ｒ］　２０１Ｉｌ　２０ｔ｛ｌ　２供｛　ＯＣＤＲＩ　｛　ＯＡＩ　１ｏ　：，ＷＩ１＾“　Ｅｆ　２伺服拧紧机通信协议　伺服拧紧机采用ＤＤＫ——ｓＡＮ—ＤＰ２￣Ｅ动装置，其通信　图１　拧紧机数据发送格式　Ｘ　５８１｛Ｒ／￣３Ｅ（＇Ｔ　＿＿Ｄ　ｌ　ＳＭＡＲＴ　ＦＡＣＴＯＲＹ　Ｉ智慧工厂　、　０　。。。０：董　表２界面控件设计　３．１通信方式选择　利用Ｖｉｓｕａｌ　Ｂａｓｉｃ６．０开发通信程序主要的方法有两种，　Ｉ四Ｆｒａｍｅ　Ｌｉｓｔｂ。ｘ　■国■Ｅ皿Ｆｒａｍｅｌ　１／　２■■固■■　存放控件　通信参数　是利用ＶＢ本身提供的控件（ＣＯＮＴＲＡＬＳ），另一种方法是　／　波特率　串口　ＰＬＣ站号　９６００，Ｎ，８，２　串口选择／站号选择　显示提示　显示提示　显示提示　通信波特率　利用ＷＩＮＤＯＷＳ　ＡＰＩ应用程序接口，ｗＩＮＤＯＷＳ　ＡＰＩ主要提　供了三个动态连接库ＫＥＲＮＥＬ．ＥＸＥ、ＵＳＥＲ．ＥＸＥ、ＧＤＩ．ＥＸＥ　Ｌａｂｅｌ　Ｌａｂｅｌ　Ｌａｂｅｌ　Ｔｅｘｔ　ＬａｂｅｌＩ　Ｌａｂｅｌ２　Ｌａｂｅｌ３　Ｔｅｘｔｌ　供开发人员调用，其中ＫＥＲＮＥＬ．ＥＸＥ主要包括一些底层操　作函数，完成一些资源管理、任务、内存等操作：ＵＳＥＲ．　ＥＸＥ包含了一些与ＷＩＮＤＯＷＳ管理有关的函数，如通讯、　菜单、消息、光标、插入符、计时器以及绝大多数非显示　函数；ＧＤ１．ＥＸＥ图形设备接口库，主要内容为与设备输出　有关的函数。在实践中，用ＶＢ控件实现通讯的方法比调用　ＳＤＫ的ＡＰＩ动态连接库的方法更加方便、快捷，而用较少的　代码可以实现相同的功能。　通信　睫特覃：　０∞ｌＩ，ｒＬ　！　３．２　串口ＭＳＣｏｍｍ控件特性　在Ｗｉｎｄｏｗｓ环境下，操作系统完全接管了各种硬件资　图２通信界面　源，不允许用户直接控制串行口的中断管理。以往程序员只　能通过数目众多的ＡＰＩ函数来控制串口。在一些编程软件中　￣ＴＥＩＶＢ６．０下提供了一个ＡｃｔｉｖｅＸ控件Ｍｉｃｒｏｓｏｆｔ　Ｃｏｍｍｕｎｉｃａｔｉｏｎ　Ｃｏｎｔｒｏｌ　６．０，简称ＭＳＣｏｍｍ控件。ＭＳＣｏｍｍ控件有许多属　ｌ￣（Ｐｒｏｐｅｒｔｙ），其中一些重要的属性见表ｌ所示。　表１　ＭＳＣｏｍｍ控件属性　－曩　０　４．１程序设计　根据上述的界面设置，在Ｌｉｓｔｂｏｘｌ控件中设置１Ｏ个Ｃｏｍ　提供选择，在Ｌｉｓｔｂｏｘ２控件中设置１　６个ＰＬＣ站号提供选择，　具体程序段设计如下所示。　Ｐｒｉｖａｔｅ　Ｓｕｂ　Ｆｏｒｍ　Ｌｏａｄ（）　Ｄｉｍ　ｉＡｓ　Ｉｎｔｅｇｅｒ　Ｆｏｒｉ＝ｌ　ＴＯ　ｌ０　＿＿　祭≯　ｌＣｏｍｍＰｏｒｔ属性设置并返回通讯端口号。　在ＭＳＣｏｍｍ控件设置ＣｏｍｍＥｖｅｎｔ属性为　ｃｏｍＥｖＲｅｃｅｉｖｅ并产生ＯｎＣｏｍｍ之前，设置并返回的　ＲＴｈｒｅｓｈｏｌｄ属性　要接收的字符数当接收字符后，若Ｒｔｈｒｅｓｈｏｌｄ属性　设置为０（缺省值）则不产生ＯｎＣｏｍｍ事件。　ＭＳＣｏｍｍ控件设置ＣｏｍｍＥｖｅｎｔ属性为ｃｏｍＥｖＳｅｎｄ并　ＳＴｈｒｅｓｈｏｌｄ属性　产生ＯｎＣｏｍｍ事件之前，设置并返回传输缓冲区中　允许的最小字符数。　ｃｏｍＥｖＳｅｎｄ　１：发送事件。　ｃｏｍＥｖＲｅｃｅｉｖｅ　２：接收事件。　ｃｏｍＥｖＣＴＳ　３：ｃｌｅａｒ—ｔＯ—ｓｅｎｄ线变化。　ＯｎＣｏｍｍ常数　ｃｏｍＥｖＤＳＲ　４：ｄａｔａ—ｓｅｔ　ｒｅａｄｙ线变化。　ｃｏｍＥｖＣＤ　５：ｃａｒｒｉｅｒ　ｄｅｔｅｃｔ线变化。　ｃｏｍＥｖＲｉｎｇ　６：振铃检测。　ｃｏｍＥｖＥＯＦ　７：文件结束。　ｃｂｏＰｏｒｔ．ＡｄｄＩｔｅｍ”Ｃｏｍ”＆Ｔｒｉｍ￥（Ｓｔｒ￥（ｉ）１　ｃｂｏＰｏｒｔ．Ｌｉｓｔｌｎｄｅｘ＝０　Ｎｅｘｔｉ　Ｆｏｒｉ＝０Ｔｏ　１５　ｃｂｏＳｔａｔｉｏｎ．Ａｄｄｌｔｅｍ…０’＋Ｔｒｉｍ￥（Ｈｅｘ（ｉ）１　ｃｂｏＳｔａｔｉｏｎ．ＬｉｓｔＩｎｄｅｘ＝０　Ｎｅｘｔｉ　Ｃａｌｌ　ＣｏｍｍＳｅｔ　Ｅｎｄ　Ｓｕｂ　ｃｏｍｌｎｐｕｔＭｏｄｅＴｅｘｔ０：通过Ｉｎｐｕｔ属性以文本方式取　ＩｎｐｕｔＭｏｄｅ常数　回数据。　ｃｏｍｌｎｐｕｔＭｏｄｅＢｉｎａｒｙ　１：通过Ｉｎｐｕｔ属性以二进制方　式检取回数据。　上述站号在此设计中只用０号站，其余站号是为了扩展　应用，Ｃａｌｌ　ＣｏｍｍＳｅｔ语句中的ＣｏｍｍＳｅｔ子程序为串口Ｃｏｉｎ的　一Ｓｅｔｔｉｎ　属性　蔟誊翟鎏　甏。　３．３　ＶＢ串口初始化设计　、　据位、停止位参　些设置，程序如下所示：　Ｐｒｉｖａｔｅ　Ｓｕｂ　ＣｏｍｍＳｅｔ（）　Ｏｎ　ＥｒｒｏｒＧｏＴｏ　ｅｒｒｌ　Ｉｆ　ＭＳＣｏｍｍ．ＰｏｒｔＯｐｅｎ＝Ｔｒｕｅ　Ｔｈｅｎ　ＩｎｐｕｔＬｅｎ属性　设置并返回Ｉｎｐｕｔ属性从接收缓冲区读取的字符数。　在本次设计中，系统应用程序串口初始化：由波特率　设置，串口选择，ＰＬＣ，￣ｉ号（拧紧机其它过程控制采用ＰＬＣ）　组成，并可以根据不同的场合进行设置。　（１）界面设计：采用一个Ｆｒａｍｅ控件、二个Ｌｉｓｔｂｏｘ控　ＭＳＣｏｍｍ．ＰｏｒｔＯｐｅｎ＝Ｆａｌｓｅ　ＥｎｄＩｆ　ＩｆＮｏｔ　ＭＳＣｏｍｍ．ＰｏｒｔＯｐｅｎ　Ｔｈｅｎ　ＭＳＣｏｍｍ．ＣｏｍｍＰｏｒｔ＝ｃｂｏＰｏｒｔ．Ｉ，ｉｓｔｌｎｄｅｘ＋１　件、三个Ｌａｂｅｌ和一个Ｔｅｘｔ控件，见表２和图２所示。　智慧工厂Ｉ　ＳＭＡＲＴ　ＦＡＣＴＯＲＹ　ＣｏｍｍＥｖｅｎｔ—ｃｏｍＥｖＥＯＦ（７）文件结束　Ｓｅｌｅｃｔ　Ｃａｓｅ　ＭＳＣｏｍｍ．ＣｏｍｒｎＥｖｅｎｔ　Ｃａｓｅ　ｃｏｍＥｖＲｅｃｅｉｖｅ　ＭＳＣｏｍｍ．ＰｏｒｔＯｐｅｎ＝Ｔｒｕｅ　Ｃｍｂｕｆｃｏｕｎｔ＝ＭＳＣｏｍｍ．１ｎＢｕｆｆｅｒＣｏｕｎｔ　Ｃｍｂｕｆｆｅｒ＝ＭＳＣｏｍｍ．Ｉｎｐｕｔ　ＣｍｓｔｒＲｅｃｅｉｖｅ＝Ｃｍｂｕｆｆｅｒ　ＥｎｄＩｆ　Ｅｘｉｔ　Ｓｕｂ　ＣＩＴｌ：　ｉｆ　Ｍｉｄ（ＣｍｓｔｒＲｅｃｅｉｖｅ，２７，１）＝”４Ｃ”Ｏｒ　Ｍｉｄ（Ｃｍｓｔｒ　Ｒｅｃｅｉｖｅ，３４，Ｉ）＝”４Ｃ”Ｔｈｅｎ　Ｔｅｘｔ２＝”９９９”　Ｔｅｘｔ３＝”９９９”　Ｅｌｓｅ　ＭｓｇＢｏｘＥｒｒ．Ｄｅｓｃｒｉｐｔｉｏｎ　Ｅｎｄ　Ｓｕｂ　４．２数据接收程序设计　（１）界面设计：采用二个Ｌａｂｅｌ和二个Ｔｅｘｔ控件，见表３　和图３所示。　表３界面控件设计　Ｅｂｉｔ＝ＣＳｔｒ（Ｈｅｘ２Ｂｉｎ（Ｍｉｄ（ＣｍｓｔｒＲｅｃｅｉｖｅ，２３，４）））　Ｅｂｉｔ　１＝ＣＳｔｒ（Ｈｅｘ２Ｂｉｎ（Ｍｉｄ（ＣｍｓｔｒＲｅｃｅｉｖｅ，２９，４）））　■　Ｌａｂｅｌ　Ｌａｂｅ１　Ｔｅｘｔ　Ｔｅｘｔ２＝Ｖａｌ（Ｅｂｉｔ）　Ｌａｂｅｌ４　Ｌａｂｅｌ５　Ｔｅｘｔ２　拧紧力矩　拧紧角度　，　显示提示　显示提示　数据显示　Ｔｅｘｔ３＝Ｖａｌ（Ｅｂｉｔ１）　Ｅｎｄ　Ｓｅｌｅｃｔ　Ｙｅｘｔ　Ｙｅｘｔ３　数据显示　Ｅｎｄ　Ｓｕｂ　４．３数据存储程序设计　拧紧力矩：Ｉ１２．５　牛米　在上述数据接收完成后，使用数据控件将拧紧结果存　人数据库中，以便后续数据追溯。使用ＤＡＯ模型访问数　拧紧角度：匝　■一度　图３数据接收界面　据，约束绑定控件，在窗体上放置一个ＭＳＦｌｅｘＧｒｉｄ控件，　在程序设计中：　（２）在数据接收程序设计中，需对拧紧结果的判断，若　拧紧结果合格，则读出数据，反之则直接写入９９９，具体程　序段设计如下所示：　Ｐｒｉｖａｔｅ　Ｓｕｂ　ＭＳＣｏｍｍ　ＯｎＣｏｍｍＯ　Ｄｉｍ　ＣｍｂｕｆｆｅｒＡｓ　Ｖａｒｉａｎｔ　Ｄｉｍ　ＣｍｓｔｒＲｅｃｅｉｖｅＡｓ　Ｓｔｒｉｎｇ　（１）在窗体的加载中增加数据库的链接：　ＡｄｏＣｏｎｎｅｃｔｓｔｒｉｎｇ＝”Ｐ　ｒｏｖｉｄｅｒ　ＭｉＣ　ｒｏｓＯｆｔ．ＪＣｔ．　ＯＬＥＤＢ．４．０；Ｄａｔａ　Ｓｏｕｒｃｅ＝”＆Ａｐｐ．Ｐａｔｈ＆”＼１　０３．ｍｄｂ；Ｐｅｒｓｉｓｔ　Ｓｅｃｕｒｉｔｙ　Ｉｎｆｏ　Ｆａｌｓｅ”　Ａｄｏｄｃ　１．ＣｏｎｎｅｃｔｉｏｎＳｔｒｉｎｇ＝ＡｄｏＣｏｎｎｅｃｔｓｔｒｉｎｇ　（２）再将串１５１读出的数据写入ＭｓＦｌｅｘＧｒｉｄ控件中，使用　Ｄｏ…ｗｈｉｌｅ循环语句将数据写入，具体见下程序段：　Ｄｉｍ　ＣｍｉＡｓ　Ｉｎｔｅｇｅｒ　Ｄｉｍ　ＣｍｂｕｆｃｏｕｎｔＡｓ　Ｉｎｔｅｇｅｒ　Ｄｉｍ　ＤｉｓＰｌａｙＳｔｒＡｓ　Ｓｔｒｉｎｇ　Ｄｏ　Ｗｈｉｌｅ　Ｎｏｔ　ｒｓ．ＥＯＦ　ＭＳＦｌｅｘＧｒｉｄ　１．Ｒｏｗ＝ｉ　Ｄｉｍ　ＴｅｍｐＳｔｒＸＡｓ　Ｓｔｒｉｎｇ　Ｄｉｍ　ＥｂｉｔＡｓ　Ｓｔｒｉｎｇ　Ｄｉｍ　ＥｂｉｔｌＡｓ　Ｓｔｉｎｇ　ｒＭＳＣｏｍｍ。ＩｎｐｕｔＭｏｄｅ　０　ＭＳＦｌｅｘＧｒｉｄ　１．Ｃｏ１＝０　ＭＳＦｌｅｘＧｒｉｄ１．Ｔｅｘｔ＝ｉ　Ｆｏｒｊ＝ｌ　ｔｏ　３　ＭＳＦｌｅｘＧｒｉｄ　１．Ｃｏｌ－ｊ　ＣｏｍｍＥｖｅｎｔ—ｃｏｍＥｖＳｅｎｄ（１）发送事件　ＭｓＦｌｅｘＧｒｉｄ　１．Ｔｅｘｔ＝ｒｓＯ—ｌ　１　Ｎｅｘｔｊ　ｒｓ．ＭｏｖｅＮｅｘｔ　ＣｏｍｍＥｖｅｎｔ—ｃｏｍＥｖＲｅｃｅｉｖｅ（２）接收事件　ＣｏｍｍＥｖｅｎｔ—ｃｏｍＥｖＣＴＳ（３）Ｃｌｒ—Ｔｏ—Ｓｅｎｄ线变化　ＣｏｍｍＥｖｅｎｔ—ｃｏｍＥｖＤＳＲ（４）Ｄａｔａ—Ｓｅｔ—Ｒｅａｄｙ线变化　ＣｏｍｍＥｖｅｎｔ—ｃｏｍＥｖＣＤ（５）Ｃａｒｒｉｅｒ　Ｄｅｔｅｃｔ线变化　ＣｏｍｍＥｖｅｎｔ—ｃｏｍＥｖＲｉｎｇ（６）检测￣ｆｉｎｇ　Ｉ－Ｉ＋ｌ　Ｌｏｏｐ　ｌ　Ｉ　ＳＭＡＲＴ　ＦＡＣＴＯＲＹ　Ｉ智慧工厂　４．４数据Ｅｘｃｅｌ导出程序设计　在本次设计中数据的查询采用ＶＢ惯用ｓＱＬ查询方式，再　将数据库Ａｃｃｅｓｓ文件数据导ＡＥｘｃｅｌ电子表格中。在窗体上　放置一个Ｃｏｍｍａｎｄ控件，对其单击实现表格转换，具体程　序段设计如下所示：　Ｐｆｉｖ￣ｅ　Ｓｕｂ　Ｃｏｍｍａｎｄｌｃｌｉｃｋ（）　＿在通过ＯＰＣ软件与上位机进行数据交换，则可以双向进行　选型，为以后整线数据追溯的扩展，采用以太网通信，以　ＯＰＣ为桥梁直接使用ＰＣ　Ｂａｓｅｄ　ＰＬＣ方式。　参考文献　［１］Ｓａｌａｈ　Ａｂｄａｌｌａｈ　ａｎｄ　Ｓａｌｅｍ　Ｎｉｊｍｅｈ，Ｄｅｓｉｇｎ，Ｔｗｏ　ａｘｅｓ　ｓｕｎ　ｔｒａｃｋｉｎｇ　ｓｙｓｔｅｍ　ｗｉｔｈＰＬＣ　ｃｏｎｔｒｏｌ［Ｊ］ＪｏｒｄＪ．Ａｐｐ］Ｓｃｉ．Ｕｎｉｖｅｒｓｉｔｙ，２００２　Ｓｅｔ　ｎｅｗｘｌｓ＝ＣｒｅａｔｅＯｏｊｅｃｔ（”Ｅｘｃｅ１．Ａｐｐｌｉｃａｔｉｏｎ”、　ｎｅｗｘｌｓ．Ｖｉｓｉｂｌｅ＝Ｔｒｕｅ　【２］Ｊ．Ｙｏｏ，ｓ．Ｃｈａ，Ｃ．Ｈ　Ｋｉｍ　ａｎｄ　Ｄ．Ｙ．Ｓｏｎ，Ｄｅｓｉｇｎ，Ｓｙｎｔｈｅｓｉｓ　ｏｆ　ＦＢＤ—　ｂａｓｅｄ　ＰＬＣ　ｄｅｓｉｇｎ　ｆｒｏｍ　ＮｕＳＣＲ￣ｒｍａｌ　ｓｐｅｃｉｉｆｃａｔｉｏｎ［Ｊ］．Ｓｏｕｔｈ　Ｋｏｒｅａ：ＫＡＩＳＴ　ａｎｄ　ＫＡＥＲＩ，２００４．　Ｓｅｔ　ｎｅｗｂｏｏｋ＝ｎｅｗｘｌｓ．Ｗｏｒｋｂｏｏｋ．Ａｄｄ　Ｓｅｔ　ｎｅｗｓｈｅｅｔ＝ｎｅｗｂｏｏｋ．Ｗｏｒｋｓｈｅｅｔｓ（１）　ｉｆＡｄｏｄｃ１．Ｒｅｃｏｒｄｓｅｔ．ＥＯＦ＝Ｆａｌｓｅ　Ｔｈｅｎ　Ｆｏｒ　ｉ＝０　ｔｏ　Ａｄｏｄｃ１．Ｒｅｃｏｒｄｓｅｔ．ＲｅｃｏｒｄＣｏｕｎｔ．１　［３】范逸之，陈立元．ＶＢ６　０与ＫＳ一２３２串行通信控制【Ｍ】．清华大学出　版社社，２００２．　【４】张钧良．Ｖｉｓｕａｌ　Ｂａｓｉｃ６．０程序设计教程『Ｍ】南京：第一版．东南大学　出皈｛±，２００３．　［５］李建华，郭明．ＲＳ２３２￣Ｎ调制解调器高级通讯编程［Ｍ】北京：人民　Ｆｏｒｊ＝０　ｔｏ　Ａｄｏｄｃ１．Ｒｅｃｏｒｄｓｅｔ．Ｆｉｅｌｄｓ．Ｃｏｕｎｔ－１　ＤａｔａＧｒｉｄ１．Ｒｏｗ＝ｉ　邮电出版社，２００１．　ＤａｔａＧｒｉｄ１．Ｃｏｌ＝ｊ　ｎｅｗｓｈｅｅｔ．ｃｅｌｌｓ（ｉ＋１ｊ＋１）＝ＤａｔａＧｒｉｄ１．Ｔｅｘｔ　［６］李小明，李东晓ｌ基于ＶｉｓｕａｌＣ＋＋６．０实现ＰＣ与ＰＬＣ的通讯［１ｌ＿电测　与仪表，２００１．　［７］通海，周到利用ＭＳＣｏｍｍ控件实现ＰＣ机与单片机串口通讯的　研究　应用科技，２００４．　［８］Ｈａ￣ｅｗ　Ｍ．Ｄｅｕｔｅ１．Ｖｉｓｕａｌ　Ｂａｓｉｃ　６．０　Ｈｏｗ　ｔｏ　Ｐｒｏｇｒａｍ［Ｍ］电子工业　Ｎｅｘｔｊ　Ｎｅｘｔｉ　Ｅｎｄｉｆ　Ｅｎｄ　Ｓｕｂ　出版社，２００３．　『９汪晓光　晓瑛．９１可编程控制器的原理与应用『Ｍ］．北京：机械工业　５结束语　经过现场实践，本次设计达到了预期的效果。通过这　出版社，２００３．　【１　０Ｊ邹宗峰，裴仁清．用ＶＢ６．Ｏ实现ＯＭＲＯＮ系￣ＩＪＰＬＣ与微机的通信　机电一体化，２００３　ｌ】１】徐德　同景．可编程序控制器应用技术ｆＭ　芹南：山东科学技术　出版社，２０００．　［１２】范逸之．ｘｒＬｓｕａｌ　Ｂａｓｉｃ与ＲＳ２３２串行通讯技术［ＭＩ．北京：中圈青年　出版，２００４．　次设计，上位机采用串口通信的方式采集数据，使用ＤＡＯ　模型访问数据，约束绑定控件，数据查询通过Ｅｘｃｅｌ输出，　在单个工作台的控制应用中，其设计简单，操作方便，　性价比良好，然而此系统也存在很多不足之处：本文提　出的数据采集只是将拧紧数据传送至工控机，而产品的选　型不能由上位机完成，若拧紧机构的数据先传送至ＰＬＣ，　（上接８９页）　声音内容判断是否需要求助或报警。此外，系统可以通过　声音辨识区分主人和陌生人，系统可以一直工作，不用手　重庆邮电大学学报自然科学版，２００４，１６（４）：１３４－１３５　［３】高立艾，李丽华，刘伟娜，等．基于ＳＰＣＥ０６１Ａ单片机的温室温湿度　动打开和关闭系统。　控制系统的设计卟农机化研究，２００８（７）：１１９－１２１．　［４】周小四，杨杰，朱一坦．用于监控智能报警系统的图像识别技术　参考文献　…赵巧妮基于单片机控制的智能家庭防盗报警系统的设计Ｕ］．自　动化技术与应用，２０１０，２９（８）：１００—１０２．　［２］李健ＳＰＣＥ０６１Ａ单片机及其在语音识别与合成系统中的应用　ｕ】．上海交通大学学报，２００２，３６（４）：４９８—４９８　［５】谢勤岚，杨康．一种基于电话网络的家居智能报警系统　电子设　计工程，２００９，１７（４）：７０—７２．