文件名称:wince.net下串口 VB 源码
文件大小:6KB
文件格式:VB
更新时间:2010-12-09 17:38:34
VB wince.net 串口 源码
使用方法:
Dim m_cs232 As New CRs232
m_cs232.openPort() '打开串口
Dim send() As Byte = {&H1, &H2, &H3}
m_cs232.write(send) '发送
Dim i as integer = m_cs232.GetReadBuffer() '得到串口输入缓冲区当前字节数
Dim rev() As Byte
rev = m_cs232.read(3) '读取3个字节
m_cs232.clsPort() '清空串口输入缓冲区
m_cs232.closePort() '最后别忘记关了串口
备注:
此控件功能较少,能但能满足大部分需要,多次测试,运行稳定
提供源代码,可自行修改
.NET Compact Framework1.1
vb.net2003下测试通过。