【VB开源代码栏目提醒】：网学会员为需要VB开源代码的朋友们搜集整理了WIN9598的串行通信机制及程序设计方法 - 期刊论文相关资料，希望对各位网友有所帮助!

Ｄ煎崆些出笠釜盟堂熊堂拯 ２ＱＱ！！￡玺！型！望笙堑趔２笙！§鲞 ＷＩＮ９５－－９８的串行通信机制及程序设计方法 ·王兰英 内容提要介绍运用ＶＢ５编制Ｐｃ机与单片机实现串行通信的方法，并给出通信源程序。

     关键词单片机异步串行通信发送与接收ＶＢ５ ＷＩＮ９５—９８ 串行通信控件 一、前言 。

     啦片机（Ｓｉｎｇｌｅ ＣｈｉＰ Ｍｉｃｒｏｃｏｍｐｕｔｅｒ）以其优异的控制功能，在〕：控领域、智能仪器仪农系统等领域Ｉ三ｌ 箍５＾１：脊伽人的生命力。

     ‘个小小的心－ｉｉ－片（儿个、ｒ方胍米）便具钉了汁算机的艰小功能，从而使．Ｊ：：控系统、仪器仪表、家ＩＵ产Ｍ向智能化厅向产ｆＩ！了飞跃。

    但足＿ｆ，ｌｍ：多需要人量计算的运川Ｉ卜，还必须借助Ｐｃ微机的强 人数执：处州能力，这样必须通过通信电路实现单片机ｏｊ Ｐｃ微机之问的可靠数据传输。

    由于串行通信具有容错能／Ｊ姒、硬件ＩＵ路简单、所需通信线少（三线）等优点，在不需要高速数据传输的地方，得到了广泛的应用。

     ｝｜：行通信协议ｒＩｌ运用最广泛的是ＲＳ２３２，所有ＰＣ机叶ｌ都带有这样的ｆＢ行通信接ＩＪ，可用于与单片机通信。

     常Ⅲ的ＤＯＳ系统二Ｅ要：ｆ：作在响应巾断方式，使Ｐｃ机程序‘ｊ单片机通信。

    ＰＣ机Ⅲ行通信程序大多利用其ＢＩＯＳ块的ＩＮＴ １４１１巾断，以查询ｆｌｊ行ＬＩ的方式完成异步ｆｌＪ行通信。

    然而在ＷＩＮＤＯＷＳ系统·１Ｉ，上层软件不再 ‘ｊ操作系统的底层ｒＩｌ断打交道，这样就使ＷＩＮＤＯＷＳ系统巾的硬件编程变得十分Ｉ稠难，对：｛；行通信接Ｌ．Ｉ的编程 也‘样。

    在ＷＩＮＤＯＷＳ系统函数巾包含了通信支持ｒｌｔ断功能。

    ＷＩＮ９５－－９８系统为每个通信设备开辟了用户定义的输入输ｆ【ｊ缓冲区（即读、’ｊ缓冲区），数据进出通信ＬＩ由系统后台来完成。

    应ＪＩｊ程序只需完Ｊ＆ｘ，ｌ输入输出缓冲Ⅸ操作就可以了。

    实际过程足每接收一‘‘个字符就产：磐４个低绂蚀件中断，ＷＩＮ９５－－９８系统中的ｊＩ｝；行驱动程序就＿【Ｄｃ得了Ｗ，Ｂ Ｊｌ权，ｊｌ：将接收到的字符放入输入数搬缓冲ｌＫ，然后将控制权返还ｊ卜在运行的应用程序，如果输入缓冲ｆ爰数据已满，小行驱动程序用当前定义的流控制机制通知发送方停』上＝发送数据，队列『ｆＪ的数据按“先进允…”的次序处理。

     在ＷＩＮ９５－－９８系统Ｉｌ、．｝｜Ｉ Ｉ－｛和ｆＩ｛行通信驱动程序足通过一一数据结构进行配惯的，这个数据结构被称为设符控制Ｊ火（ＤＥＶＩＣＥ ＣＯＮＴＲＯＬ ＢＬＯＣＫ），简称ＤＣＢ。

     花ＷＩＮ９５－－９８ Ｆ，通常呵按以下四步实现ｔｌ坪ｉ通信： （１）按队议的设攒初始化并打Ｊｔ：ⅢｌＪ，这样做就足通知ＷＩＮＤＯＷＳ小应用程．ｒｉ序；幡ｆ－，要这个小Ｉ－Ｉ，并封锁其他Ｊ＿ＪＩＪ干ｌＩ！Ｊ≯使它１『Ｊ１ｉ能使』｛Ｊ此ｊｌ｛Ｉ Ｉ。

     （２，艇肖：这个ｆＩ：｜｛。

     （３）住ⅢＩ Ｉ ｌ：矩返地１‘输数掂，Ｊｉ：谯ｆ譬输过程一ｌ一进行校验。

     （４）小ｊ＊婴此｛ｌ：Ｉ Ｊ１１’１‘．天闭Ⅲ【Ｉ。

    ｌ｛｜Ｊ释放出Ｉ Ｊ以供ｊＣ它应Ｊ『Ｊ｛鼙序使川。

     住这个过榭·ｈＩ ＿ｌｉ婴的张序代码集Ｉｆｌ在笫（３）少。

    然Ｉｆ，ｉｘ，Ｊ ＪＩ．一般的程序员ｌ叭；，对设备控制块ＤＣＢ的编程：１１ｉ９１：；…雉，＿ｊｊ｜５么蜘冲ｑ简化编程姬【｜．完成对｝：Ｉ｛行通信接Ｉ一…，Ｊ所仃功能的应Ｊ｜〕ｌ！Ｊｉ：？相：ＶＢ５ ｒＩ，提供了一个ＭＳＣＯＭＭ挖件．它，’Ｚ－－‘个专门川ｎ对ｆＩ埽ｊ通信接ＩＪ进行编程的控件，通过对它的运川，ｌｑ‘以火人简化对；ｌ矸ｉ通信接Ｉ Ｊ的编刷，ＩＮ为这个Ｙ，？ＰＩ：Ｉ，Ｉ装了所仃关于｝Ｉ｛行通信接Ｉ Ｉ的ＤＣＢ编程，埘Ｊ１ｊ，。

    而．ｊ，界＿匝ｉ简便，＿Ｉ＿１ｊ起来－ＩＩ？，Ｔ；方便。

     二、ＭＳＣＯＭＭ控件的使用 为Ｊ’说Ｉ”Ｊ办他．我们以ＶＢ５一Ｉ－文版为例来说｝ｌＪＪ ＭＳＣＯＭＭ的常川属性、方法、‘ｊ…：。

    坡后给…源程序。

     伦ＶＢ５·Ｉ—ｊ Ｊ）ｆ：＋柏ｉｎ，Ｊ Ｉ：ｆ’Ｉ！．柏：“Ｉ：｝Ｉ！”１ ２菜Ｉｎｔ”Ｊ量＿｜＿ｌｉ“糊５ｆ，ｌ‘”ｒ菜一丫１．，就会洲｝Ｉ｛“瑚５｛Ｊ｛：”刈话｝１ｉ，ｎ！“控什”口！ＩＩｔ，选ｓｌ…Ｍ１ＣＲ（）ＳＯＩ？Ｔ ＣＯＭＭ ＣＯＮＴＲＯｌ。

    ５．０”前的复选｛＝Ｉｌ：，点．ｊｉ“确定”返川。

    此时往左边的１ ２Ｉ｝栏 万 　 方数据小，－一Ｊ．以发现多了一个形状象一个ＩＵ话样的控件，这就赴ＭＳＣＯＭＭ控件。

    每个使川的ＭＳＣＯＭＭ控件刈应着‘‘‘个ｊＩ：行端Ｉ ｌ。

    如果Ｊ遁川辆｛序需要访ｎＵ多个串行端Ｉ一１，必须使Ｊｔ】多个ＭＳＣＯＭＭ控什。

    ＭＳＣＯＭＭ控件具仃ｙｌ：多的属性，ｆＩ【足厦婴的植一陀列如Ｉ－： 榭性 椭述 ＣｏｎｕｎＰｏｔ，ｔ ｉ殳霄Ｊ｛：返州通讯端Ｉ Ｊ号。

     、 Ｓｅｔｔｉｒｉｇｓ 以’７：符ｍ的形工℃设矬并返叫波特率、奇偶校验、数撕位、停１ｉ：位。

     ＰｏｒｔＯｐｅｎ ｉ殳岿！Ｊｆ：返刚通讯端ＬＩ的状态。

    也可以打，ｒ和关ＰＪ〕＿！ｆｉｒ，ｉ Ｉ－Ｉ。

     Ｉｎｐｕｔ 从接收缓冲区返回和删除字符。

     Ｏｕｔｐｕｔ 向ｆ钳ｉｉｉ缓冲区写‘个字符ｆＩ｝｛。

     Ｃｏｌ ｘｕｎＦ．ｖｅｎｔ 返叫１ｉ同的值水表示不Ｉ司的通讯错误或＞’ｌｉｆｔ：。

    这些常数可以在陔控什的对象库－１Ｉ找到。

     ＭＳＣＯＭＭ控件八仃ＯＮＣＯＭＭ’－Ｍｑ：来实现”Ｍｇ：驱动方式的｝｜；行通信程序编写。

    无沦ｔⅡ时ｊｌｊ ＣｏｍｍＥｖｅｎｔ心。

    ｌ’ｌ！ＩＩ（Ｊ｛Ｉ＿！【变化时，就产生ＯｎＣｏｎｕｎ：ｌｔｆｆ：，标志发生了一个通汛小件或一个错洪。

    现将常川的Ｃｏ，ｍ１Ｅｖｅｎｔ属性所返刚的一ｉ川位ｆＦＪ小｜ｆ，－ｊ意义列如Ｆ： 迎讯钳跌包括卜．列没谲：值： 常数 值 描述 ＣｏｍＥｖｅｎｔＲｘＯｖｅｒ １００８ 接受缓冲区溢出。

    接收缓冲区没有窄问。

     ｃｏｍＥｖｅｎｔＴｘＦｕｌｌ １０ｌＯ 传输缓冲区已满。

    传输字符时代输缓冲区已满 通讯。

    ｊ〔什包括下列设戳值： ……………………………………一…～…………～一…… 常数 值 描述 ｃｏｍＥｖＳｅｎｄ ｌ 在化输缓冲区ｌＩＩ订比Ｓｔｈｒｅｓｈｏｌｄ数少的字符。

     ＣｏｍＥｖＲｅｃｅｉｖｅ ２ 收到Ｒｔｈｒｅｓｈｏｌｄ个字符。

    该习ｆ件将持续产’ｌ－ｌｉｔｔＪｓＯＩ Ｊ Ｉｎｐｕｔ槭忡从 接收缓冲ｌｊ）‘：Ｉｌｌ删除数捌。

     三、ＰＣ机ＶＢ通信程序实例 以ｌｉ例＿Ｊ，足ＰＣ机’ｊｔｐ”机；Ｉ；行通信的ＶＢ源稿：序。

     ． ｜）ｌ’１ ｉ ｒａｔｅ Ｓｕｂ Ｆｏｒｍ—Ｌｏａｄ ０ ’｛！：ｕ始化ＭＳＣＯ Ｍ！Ｍ控仲 Ｄｉｍ ｌｎｓｔｒｉｎｇ Ａｓ Ｓｔｒｉｎｇ’保存输入子串的缓冲区 ＭＳＣｏｆＩｕｎｌ．ＣｏｎｕｎＰｏｒｔ＝ｌ’使用ＣＯＭｌ。

     ＭＳＣｏｍｍｌ．Ｓｅｔｔｉｎｇｓ＝”９６００，Ｎ，８。

    １”９６００波特。

    无奇偶校验，８位数扒， 一个停ｌｌ：位； ’”１输入ｌ｜ｌ‘川时： ’告诉控件读入祭个缓冲区。

     ＭＳＣｏｎｕｎｌ．ＩｎｐｕｔＬｅｎ＝０ ＭＳＣｏｍｍｌ．ＰｏｒｔＯｐｅｎ＝’ｔｒｕｅ’打”端１ １。

     ＭＳＣｏｍｄ．Ｏｕｔｐｕｔ：”ＡＴ”＋Ｃｈｒ￥（１３）’将ａｔｔｅｎｔｉｏｎ命令送到调制解ｉＪｌＩｊ器。

     Ｅｎｄ Ｓｕｂ Ｐ１’ｉ ｖａｔｅ Ｓｕｂ ＭＳＣｏｍｍ—ＯｎＣｏｍｍ ０ ’通信习ｆ件程Ｊ弘川ｊ二处理通信ｊｊｆ件‘ｊ＿｝ｊ｝误 ＳｅｌｅＣｔ ｃａｓｅ ＭＳＣｏｍＪｎｌ．ＣｏｍｍＥｖｅｎｔ’锵跌 Ｃａｓｅ ｃｏｍＥｖｅｎｔＢｒｅａｋ’收至０ Ｂｒｅａｋ。

     Ｃａｓｅ ｃｏｍＥｖｅｎｔＣＤＴＯ’ＣＤ（ＲＬＳＤ）超Ｉｆ寸。

     Ｃａｓｅ ｃｏｍＥｖｅｎｔＣＴＳＴ０’ＣＴＳ Ｔｉｍｅｏｕｔ。

     Ｃａｓｅ ｃｏｍＥｖｅｎｔＤＳＲＴ０’ＤＳＲ Ｔｉｍｅｏｕｔ。

     Ｃａｓｅ ｃｏｍＥｖｅｎｔＦＩ，ａｍｅ’Ｆｒａｍｉｎｇ Ｅｒｒｍ· ８５ 万 　 方数据 Ｃａｓｅ ｃｏｍＥｖｅｎｔＯｖｅｒｒｕｎ ’数捌丢失。

     Ｃａｓｅ ｃｏｍＥｖｅｎｔＲｘＯｖｅｒ’接收缓冲区溢｝ｌｊ。

     Ｃａｓｅ ｃｏｍＥｖｅｎｔＲｘＰａｒｉｔｙ’Ｐａｒｉｔｙ错溪。

     Ｃａｓｅ ｃｏｍＥｖｅｎｔｌ、ｘＦｏｌｌ ’传输缓冲区已满。

     Ｃａｓｅ ｃｏｍＥｖｅｎｔＤＣＢ ’获取ＤＣＢ〕时意外错误’事件 Ｃａｓｅ ｃｏｍＥｖＣＤ’ＣＤ线状态变化。

     Ｃａｓｅ ｃｏｍＥｖＣＴＳ’ＣＴＳ线状态变化。

     Ｃａｓｅ ｃｏｍＥｖＤＳＲ’ＤＳＲ线状态变化。

     Ｃａｓｅ ｃｏｍＥｖＲｉｎｇ’Ｒｉｎｇ Ｉｎｄｉｃａｔｏｒ变化。

     Ｃａｓｅ ｃｏｍＥｖＲｅｃｅｉｖｅ’收到ＲＴｈｒｅｓｈｏｌｄ＃ｏｆｃｈａｒｓ． Ｃａｓｅ ｃｏｍＥｖＳｅｎｄ ’传输缓ｐｐ区柏‘Ｓｔｈｒｅｓｈｏｌｄ个字符 Ｃａｓｅ ｃｏｍＥｖＥｏｆ’输入数拂：流ｒｆｌ发现ＥＯＦ字符 Ｅｎｄ Ｓｅｌｅｃｔ Ｅｎｄ Ｓｕｂ ＰＩ’ｉｒａｔｅ Ｓｕｂ Ｃｏ．ｕｎａｎｄｌ—Ｃ１ｉｅｋ０ ’该子程序说｝¨Ｊ如何从接收缓，冲区渎取数据。

    · ＤｉｌＴｌ Ｉ ｎＳｔｒｉｎｇ ａｓ Ｓｔｒｉｎｇ ＭＳＣｏｍｍｌ．ＩｎｐｕｔＬｅｎ＝０’读取所有可Ｊｌ】数据。

     Ｉ｛、ＭＳＣｏｍｍＩ．ＩｎＢｕｆｆｅｒＣｏｕｎｔ Ｔｈｅｎ’检查数据。

     ＩｎＳｔｒｉｎｇ＝ＭＳＣｏｍｍｌ．Ｉｎｐｕｔ’Ｒｅａｄ ｄａｔａ． Ｅｎｄ ＪＩ’ ｌ－ｎｄ Ｓｕｂ １）Ｉ’ｉ Ｖａ¨Ｓｕｂ Ｉｎｔｅｇｅｒ） ’ Ｆｔ）．Ｆｍ一＿Ｋｅｙｌ’ｒｅｓｓ（ＫｅｙＡｓｃｉｉ Ａｓ 该子程序说ｆ¨Ｊ如何将用ｔ户键入的每…个字符 送刨Ⅲ行端Ｉ Ｉ： ＤｉｆｌＩ ＢＬｌｆｆｅｌｌ ａｓ Ｖａｔ’ｉａｎｔ ＭＳＣｏｍＭ．Ｃｏｎｕｎｌ’ｏｒｔ＝ｌ ’砹谶并打开窗ＩＪ ＭＳＣｏｎｕｎ １．ＰｏｒｔＯｐｅｎ＝Ｔｒｕｅ ｌ｛ｔ１１、ｆｅｌｌ＝Ｃｈｌ’￥（ＫｅｙＡｓｃｉ ｉ） ＭＳ（ｈ）ｌｌｌｌｌｌｌ．Ｏｕｔｐｕｔ＝ＢｕＩ’ｆｌｅＦ Ｅｎｄ Ｓ“ｂ 参考文献 １．美ｂａ ｒｗｉｎ Ｂｏｙｌｅ等Ｖｉ ｓｕａｌ Ｂａｓｉｃ ５ Ｄｅｖｅｌｏｐｅｒ’ｓ Ｇｕｉｄｅ．北京，机械工业出版社，１ ９９８。

     ２．Ｖｉ ｓｔｉｒｌ ＢＲ Ｓｉ ｃ ５．０ Ａｃｔｉ ｖｅＸ控件参考手册，科学出版社龙门书局，Ｍｉｃｒｏｓｏｆｔ Ｃｏｒｐｏｒａｔｉｏｎ著。

    万　 方数据