2个回答
展开全部
简单的很啊 假设你使用的通讯控件mscomm1 你那个端口选择是combo1那么代码如下
mscomm1.commprot=val(combo1.text)
‘如果需要截取字段的话 例如 你combo1.text显示的是 COM1 COM2 ....代码如下
mscomm1.commprot=Val(Right(Combo1.Text, InStrRev(Combo1.Text, "C")))'这样截取出来的结果就是 1
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
迪凯特科技（北京）有限公司
2023-07-28 广告
要从电脑的一个串行口接收数据并将其从另一个串行口发送出去，你可以使用以下步骤：1. 确定你要使用的两个串行口。在大多数计算机上，串行口通常被称为COM1、COM2等。确保你了解每个串行口的名称或编号。2. 编写一个程序来读取来自一个串行口的...
点击进入详情页
本回答由迪凯特科技（北京）有限公司提供
展开全部
Private Sub Combo1_Click()
If MSComm1.PortOpen = True Then MSComm1.PortOpen = False
MSComm1.CommPort = Val(Combo1.Text)
End Sub
If MSComm1.PortOpen = True Then MSComm1.PortOpen = False
MSComm1.CommPort = Val(Combo1.Text)
End Sub
追问
无效的端口号，commport这里怎么设置？
追答
CommPort 设置的是数字~
你combo列表里写的是 字母+数字
需要这样修改下
MSComm1.CommPort = Val(replace(combo1.text,"COM",""))
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
