按部就班VB6的串口编程.pdf

按部就班VB6的串口编程.pdf

ID:52242144

大小:769.53 KB

页数:21页

时间:2020-03-25

按部就班VB6的串口编程.pdf_第1页
按部就班VB6的串口编程.pdf_第2页
按部就班VB6的串口编程.pdf_第3页
按部就班VB6的串口编程.pdf_第4页
按部就班VB6的串口编程.pdf_第5页
资源描述:

《按部就班VB6的串口编程.pdf》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、图说VB6串口编程--------伯兮科技图说VB6串口编程-------伯兮科技1,首先,电脑中必须有串口设备,没有的需要USB转串口或者虚拟串口,电脑中必须安装VB6的开发环境2,如上图打开VB6程序3,文件-〉新建第1页共21页伯兮科技出品图说VB6串口编程--------伯兮科技4,单击确定,如下图第2页共21页伯兮科技出品图说VB6串口编程--------伯兮科技5,单击保存第3页共21页伯兮科技出品图说VB6串口编程--------伯兮科技6,选择存储路径第4页共21页伯兮科技出品图说VB6串口编程--------

2、伯兮科技7,选择或者新建路径并且保存第5页共21页伯兮科技出品图说VB6串口编程--------伯兮科技8,继续保存第6页共21页伯兮科技出品图说VB6串口编程--------伯兮科技9,选择No第7页共21页伯兮科技出品图说VB6串口编程--------伯兮科技10,拉伸改变窗体大小第8页共21页伯兮科技出品图说VB6串口编程--------伯兮科技11,右键单击,选择部件第9页共21页伯兮科技出品图说VB6串口编程--------伯兮科技12,选择并且单击选中划钩,单击确定第10页共21页伯兮科技出品图说VB6串口编程--

3、------伯兮科技13,多了一个控件了。第11页共21页伯兮科技出品图说VB6串口编程--------伯兮科技14,单击上面的控件,然后在窗体添加该控件第12页共21页伯兮科技出品图说VB6串口编程--------伯兮科技15,观察右侧的控件属性第13页共21页伯兮科技出品图说VB6串口编程--------伯兮科技16,调整属性第14页共21页伯兮科技出品图说VB6串口编程--------伯兮科技17,增加按钮command1,caption属性更改为“打开串口”第15页共21页伯兮科技出品图说VB6串口编程--------

4、伯兮科技18,双击“打开串口”添加代码第16页共21页伯兮科技出品图说VB6串口编程--------伯兮科技上面一行代码是最简单的代码,但是存在一个问题,如果串口已经打开,在此执行该代码会导致错误,所以,比较好的习惯是对串口是否打开进行一下判断。第17页共21页伯兮科技出品图说VB6串口编程--------伯兮科技---------------------PrivateSubCommand1_Click()IfMSComm1.PortOpen=FalseThenMSComm1.PortOpen=True'打开串口EndIfEn

5、dSub-------------------19,增加command2控件caption属性改为“发送数据”第18页共21页伯兮科技出品图说VB6串口编程--------伯兮科技20,双击“发送数据”添加程序代码第19页共21页伯兮科技出品图说VB6串口编程--------伯兮科技21,增加接收数据的环节,由于通常电脑不会有两个串口,可以把串口输出的3引脚(发送)和2引脚(接收)通过导线进行连接。这样才可以进行串口接收的实验22,增加command3按钮,并且修改caption属性为“接收数据”,然后把接收的数据打印到窗体上

6、23,双击“接收数据”,增加代码第20页共21页伯兮科技出品图说VB6串口编程--------伯兮科技------------------------PrivateSubCommand3_Click()DimaAsString'定义字符串a=MSComm1.Input'接收数据赋值给字符串变量aPrinta'打印字符串变量aEndSub-----------------------------24,第21页共21页伯兮科技出品

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。