国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 開發(fā) > 綜合 > 正文

如何在PB中實(shí)現(xiàn)串口編程

2024-07-21 02:10:04
字體：大 中 小
供稿：網(wǎng)友

可以使用mscomm32.ocx控件

腳本如下：

    string ls_data

    //使用com1端口。

    ole_1.object.commport = 1

    //設(shè)置速率為9600,無奇偶校驗(yàn)，8 位數(shù)據(jù)，一個停止位。

    ole_1.object.settings = "9600,n,8,1"

    //讀入整個緩沖區(qū)的數(shù)據(jù)。

    ole_1.object.inputlen = 0

    打開端口

    ole_1.object.portopen = true

    //發(fā)送attention命令

    ole_1.object.output = "atv1q0" + char(13)

        //等待數(shù)據(jù)。

    do

        yield()

        //從com端口取數(shù)據(jù)

        ls_data += ole_1.object.input

   loop until(pos(ls_data, "ok" + char(13) + char (10)) > 0)

 

    //向com端口發(fā)送數(shù)據(jù)使用output方法

        ole_1.object.output = ls_data

        //關(guān)閉端口。
        ole_1.object.portopen = false

發(fā)表評論 共有條評論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板： 绥棱县| 米林县| 洪江市| 寿宁县| 龙海市| 沂源县| 永寿县| 左云县| 沙湾县| 喀什市| 资兴市| 天峨县| 彭阳县| 日土县| 阳春市| 澄江县| 弥渡县| 和田县| 南安市| 光泽县| 洛隆县| 灵武市| 苗栗县| 黔西县| 上高县| 竹北市| 林甸县| 宿松县| 临澧县| 德格县| 江西省| 儋州市| 永康市| 岱山县| 河津市| 阳曲县| 张家界市| 崇仁县| 永顺县| 高安市| 连山|