计算机有二个串口VB中要如何处理才能同时通讯

kuaidi.ping-jia.net  作者:佚名   更新日期:2024-06-26
求VB用串口在两台计算机上进行传输数据的程序

1. 声明com控件
Public WithEvents moCom As SCCIATLLib.WinCom
2. 进行连接
Set moCom = New SCCIATLLib.WinCom
moCom.Setup 9600, 8, 0, 0
moCom.SetupBlockModel 0
moCom.SetupHandshaking 1
moCom.Open "comx" 'com口设备
3 . 发送数据
moCom.Write “少时诵诗书”
4. 接收数据
Private Sub moCom_OnComEvent(ByVal comEvent As Integer, ByVal eError As Integer)
comEvent=1时表示接收数据
‘下面用循环读出缓冲里的全部数据。读完后会自动清除已读数据。
sA = frmMain.moCom.Read
Do While sA ""

mScom = mScom & sA
'lblMsg = "目前的连接状况:良好"

sA = frmMain.moCom.Read
Loop

你好!
看你发送数据的类型,是16进制还是字符串?
这个没有看到你的程序和通讯字符串,很多都是未知的

你的电脑和PLC的通讯格式?
还有你PLC的程序怎么写的

你这三台设备串口是怎么连接的?

计算机的两个串口是相互独立的,可以同时与两个外界设备通讯,你只需要在VB程序中放入两个 MSComm 通讯控件,然后分别设置相应的参数就可以了,但有一点要注意:就是两个控件的CommPort 属性不能设置成一样的,否则打开一个串口后,再打开就会出错。例子如下:

MSComm1.CommPort = 1 '设置串口1
MSComm1.Settings = "9600,N,8,1"'设置波特率、奇偶校验、数据位、停止位
MSComm1.PortOpen = True'打开串口1

MSComm2.CommPort = 2 '设置串口2
MSComm2.Settings = "9600,N,8,1"'设置波特率、奇偶校验、数据位、停止位
MSComm2.PortOpen = True'打开串口2

这样就没问题了!

一台机器,二个串口

要通信,连接线 应该交叉

A 口 B 口
发送Tx --- 接收Rx
接收Rx --- 发送Tx
信号地 --- 信号地

3线 就可以 全双工 通信

祝你顺利

  • 计算机有二个串口VB中要如何处理才能同时通讯
    答:计算机的两个串口是相互独立的,可以同时与两个外界设备通讯,你只需要在VB程序中放入两个 MSComm 通讯控件,然后分别设置相应的参数就可以了,但有一点要注意:就是两个控件的CommPort 属性不能设置成一样的,否则打开一个串口后,再打开就会出错。例子如下:MSComm1.CommPort = 1 '设置串口1 MSComm...
  • ...com2,485口,我想编写vb程序通过485传输数据,我vb里面串口部分...
    答:MSComm1.CommPort = 1 '选用com1串行口 MSComm1.Settings = "9600,N,8,1" '波特率9600,无奇偶校验位,8位数据位1位停止位 MSComm1.InputLen = 0 'input将读取接收缓冲区的全部内容 MSComm1.InBufferSize = 1024 '设置接收缓冲区的字节长度 'MSComm1.PortOpen = True '打开通信口 MSComm1.InB...
  • 如何用VB读取多个串口的数据
    答:可选中1个或多个下面的关键词,搜索相关资料。也可直接点“搜索资料”搜索整个问题。 vb 串口 搜索资料 本地图片 图片链接 代码 提交回答 匿名 回答自动保存中为你推荐:特别推荐 NASA公布照片后,全世界感谢中国! 先有鸡或先有蛋的千年谜题?有答案了 为啥电子烟也被纳入控烟范围? 《流浪地球》点燃木星就把地球...
  • 如何用VB实现多串口通讯程序?
    答:建立多个mscomm控件,或者建立mscomm控件数组,每个控件对应不同的串口号进行初始化就可以。用多串口卡应该是可以的。另外USB转串口的要慎用,会出现莫名其妙的问题。
  • VB中使用多个串口进行通信应该怎么办?最好举例说明,谢谢了。
    答:5个串口同时接收数据进行处理,没有办法。如果不是同时处理,可以添加一个选择并设置串口的按钮(当然要添加一个text框以便输入设置参数)
  • ...VB串口调试,不短接2,3脚,不用串口精灵。怎么直接在VB里实现串口自发...
    答:VB 中如何调试串口,不用短接2,3脚的那种,就用双机交叉方式吧。即2接3、3接2.另外一端,可以用 Win自带的 【超级终端】来模拟。追问我说的是不是用硬件,直接在VB程序中就能实现,串口的自发自收。回答说的是不是用硬件,直接在VB程序中就能实现,串口的自发自收.没有硬件,不可能实现得了串口...
  • 请教VB高手一个串口的问题
    答:从你的代码看未见明显错误.请检查2个串口的连接线及接法:2个串口间 2-3 3-2 5-5 连接 各自串口 4-6 7-8 短接 如果接线正确,你可用串口调试软件来测试.再问个问题,你机器有几个串口,现在机器就1个串口,应该是将RS232口的2-3脚连接就可....
  • vb如何使用串口通讯
    答:'点击“接收”命令按钮接收数据Private Sub Command2_Click() Dim st As String st = MSComm1.Input Text2.Text = st '将接收到的数据至入文本框Text2End Sub '===’PC机串行口定时自动接收/发送VB程序 Private Sub Form_Load() MSComm1.PortOpen = True '开启通信控件的端口...
  • 在VB中如何实现多串口同时工作?
    答:用6个mscomm控件。1。用轮询方式,分别要求6个电子秤先后返回采集数据。2。用事件方式,在6个mscomm_oncomm事件里面同时接收数据。
  • VBA 串口通讯问题
    答:1 mscomm.vbx通信控件描述 mscomm.vbx通信控件可直接从vb的toolbox中加入窗体form,即可用其进行通信。若toolbox中无此控件,则用tools的custom controls 将mscomm.vbx从windows的system子目录中加入vb的toolbox中。1.1 通信方式 mscomm.vbx有2种不同的方式来处理和解决各类通信软件的开发和设计问题 1...