vb.net创建虚拟串口 如何创建虚拟串口( 四 )


BOOLfWriteStat ; char szBuffer[count];
…………//准备好发送的数据 , 放在szBuffer[]中
fWriteStat = WriteFile(hCom, szBuffer, dwBytesToWrite,
dwBytesWritten, WRITE_OS( npTTYInfo ) ); //写数据
//我在CreareFile()时使用了FILE_FLAG_OVERLAPPED,现在WriteFile()也必须使用LPOVERLAPPED结构.否则,函数会不正确地报告写操作已完成了.
使用LPOVERLAPPED结构,WriteFile()立即返回,不必等待写操作完成,实现非阻塞 通信.此时, WriteFile()返回FALSE, GetLastError()返回ERROR_IO_PENDING.
int err=GetLastError();
if (!fWriteStat) {
if(GetLastError() == ERROR_IO_PENDING){
while(!GetOverlappedResult(hCom, WRITE_OS( npTTYInfo ),
dwBytesWritten, TRUE )) {
dwError = GetLastError();
if(dwError == ERROR_IO_INCOMPLETE){// normal result if not finished
dwBytesSent += dwBytesWritten; continue; }
......................
//我使用了多线程技术 , 在辅助线程中监视串口,有数据到达时依靠事件驱动,读入数据并向主线程报告(发送数据在主线程中,相对说来,下行命令的数据总是少得多);并且,WaitCommEvent()、ReadFile()、WriteFile()都使用了非阻塞通信技术,依靠重叠(overlapped)读写操作 , 让串口读写操作在后台运行 。
vb程序编写模拟串口这是典型的VB串口通信
你可以采用Mscomm控件实现串口通信时,首先添加一Mscomm控件到窗体中,通过菜单项“工程(P)→部件(O)”进入选择窗口,在控件页中选取“Microsoft Comm Control 6.0” ,此时工具窗口中出现Mscomm图标 , 即可被使用 。
需要注意的几点是:
1.用mscomm控件进行通信,其波特率最高只能设为115200
2.利用MSCOMM控件可以发送和接收任何文件的类型 。
3.接收文本文件和二进制文件有一定的区别,接收二进制文件时用scomm1.Input读入的变量需用Variant类型的变量,而文本文件可以用字符型变量,另外InputMode属性应设置相应的文本方式或二进制方式
4.接收文本无大小限制 。
5.当连续存数据时记录号是自动加的,但当文件关闭后再次打开时,默认的记录号为1,存储文件不完整的原因可能在此 。接收到文件头识别字符时打开文件 , 接收中途不要关闭文件,直到接收到文件结束符(Mscomm1.EOFEnable事件发生)才能关闭文件 。
我手头有一个完整的VB串口通信源码,对你的问题很有帮助
若你需要,发邮件至donook@qq.com
我会尽快发给你
如果满意,加点分哦,资料都来之不易的呵呵
vb.NET中用mscomm控件编写串口通信软件数据无法接收.net中不用mscomm 而改用 searport
AxMSComm1.Input 只能一次vb.net创建虚拟串口,会把输入缓冲区vb.net创建虚拟串口的内容全都读出来并清空
如果没有产生Oncomm事件,vb.net创建虚拟串口你可以把输入经部区的大小改一下改成1就行vb.net创建虚拟串口了
VB.net串口通讯接收数据写法Do
Application.DoEvents()
Loop Until MSComm1.InBufferCount = 13
Dim a As String = MSComm1.Input
Label1.Caption = a.Substring(1, 9)
Label2.Caption = a.Substring(10, 3)
关于vb.net创建虚拟串口和如何创建虚拟串口的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。

推荐阅读