锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net虚拟串口 vbnet串口通信如何编写

IT技术数据

怎样在vb中自动检测到可用串口号的具体程序代码j = 0
For i = 1 To 16 Step 1
If comISP.PortOpen = True Then'先关闭串口
comISP.PortOpen = False
End If
comISP.CommPort = i
On Error Resume Next'说明当一个运行时错误发生时，控件转到紧接着发生错误的语句之后的语句，并在此继续运行 。访问对象时要使用这种形式而不使用 On Error GoTo 。
comISP.PortOpen = True
If Err.Number8002 Then'无效的串口号 。这样可以检测到虚拟串口 ， 如果用Err.Number = 0的话检测不到虚拟串口
If j = 0 Then
j = i
End If
cboPort.AddItem "COM"i'生成串口选择列表
End If
comISP.PortOpen = False
Next i
If j = 1 Then
cboPort.Text = "COM"j'自动打开可用的最小串口号
comISP.CommPort = j
comISP.PortOpen = True
cmdOpenCom.Caption = "关闭串口"
shpCOM.FillColor = vbGreen
If Err.Number = 8005 Then'串口已打开,vbExclamation '
comISP.PortOpen = False
cboPort.Text = ""
cmdOpenCom.Caption = "打开串口"
shpCOM.FillColor = vbRed
End If
End If
VB.NET串口通讯怎么发送和接收十六进制？串口通信最终都是用二进制传输的，你用代码把二进制转化成十六进制就可以了 。不需要额外设置 。
用vb.net做串口通讯程序要调用哪些api函数?串口API通信函数编程
16位串口应用程序中vb.net虚拟串口 ， 使用vb.net虚拟串口的16位的Windows API通信函数:
①OpenComm()打开串口资源，并指定输入、输出缓冲区的大?。ㄒ宰纸诩疲?
CloseComm() 关闭串口;
例：int idComDev;
idComDev = OpenComm("COM1", 1024, 128);
CloseComm(idComDev);
②BuildCommDCB() 、setCommState()填写设备控制块DCB，然后对已打开的串口进行参数配置; 例：DCB dcb;
BuildCommDCB("COM1:2400,n,8,1", dcb);
SetCommState(dcb);
③ ReadComm 、WriteComm()对串口进行读写操作，即数据的接收和发送.
例：char *m_pRecieve; int count;
ReadComm(idComDev,m_pRecieve,count);
Char wr[30]; int count2;
WriteComm(idComDev,wr,count2);
16位下的串口通信程序最大的特点就在于：串口等外部设备的操作有自己特有的API函数；而32位程序则把串口操作（以及并口等）和文件操作统一起来了 ， 使用类似的操作 。
在MFC下的32位串口应用程序
32位下串口通信程序可以用两种方法实现：利用ActiveX控件；使用API 通信函数 。
使用ActiveX控件，程序实现非常简单 ， 结构清晰 ， 缺点是欠灵活；使用API 通信函数的优缺点则基本上相反 。
使用ActiveX控件：
VC++ 6.0提供的MSComm控件通过串行端口发送和接收数据，为应用程序提供串行通信功能 。使用非常方便，但可惜的是 ， 很少有介绍MSComm控件的资料 。
⑴．在当前的Workspace中插入MSComm控件 。
Project菜单------Add to Project----Components and Controls-----Registered
ActiveX Controls---选择Components: Microsoft Communications Control,
version 6.0 插入到当前的Workspace中 。
结果添加了类CMSComm(及相应文件：mscomm.h和mscomm.cpp ) 。
⑵．在MainFrm.h中加入MSComm控件 。
protected:
CMSComm m_ComPort;
在Mainfrm.cpp::OnCreare()中：
DWORD style=WS_VISIBLE|WS_CHILD;
if (!m_ComPort.Create(NULL,style,CRect(0,0,0,0),this,ID_COMMCTRL)){
TRACE0("Failed to create OLE Communications Control\n");
return -1;// fail to create
}
⑶.初始化串口
m_ComPort.SetCommPort(1);//选择COM?
m_ComPort. SetInBufferSize(1024); //设置输入缓冲区的大?。珺ytes
m_ComPort. SetOutBufferSize(512); //设置输入缓冲区的大?。?Bytes//

推荐阅读


上一篇：c语言数据结构关系图，c语言中的数据结构具体有哪些?

下一篇：微信小程序可以注册专利吗，微信小程序可以申请专利吗