vb,串行端口调试(总是出现无法打开串口com1,确认串口是否存在),该怎么办

来源:百度知道 编辑:UC知道 时间:2024/05/11 15:30:36
Private Sub Command1_Click()
Timer1.Enabled = True
End Sub

Private Sub Command2_Click()
Timer1.Enabled = FASLE

End Sub

Private Sub Command3_Click()
MsgBox "下面的代码仅是调用的大体步骤,所有的参数值需要您分别赋值后才能运行!" & vbCrLf & _
"其中第四步和第五步可以循环调用" & vbCrLf & _
"函数详解请见《关于SendToLedOCX控件的二次开发说明》文档"
'Exit Sub

With SendToLedOCX1

.ScriptStart '一.开始脚本定义

.SetScreen 12, 8, 1 '二.设置屏幕规格参数

.SetIP "192.168.30.253", 10001, 62597 '三.设置屏幕通讯方式 'If TCP / IP Is Nothing Then

' .SetComm 0 - RS232, 1 - COM1, 14400, 62597 'ElseIf COM1 Is Nothing Then
' End If

.SetWindow 0, 0, 23, 8

换个串口。用串口2。或者从网上找个串口助手测试一下。哪个串口可行。你所用的串口是不是不通。
要不你就留下你的邮箱我给你传过去一个串口助手。。。

还有就是检查一下你VB所用的串口是不是被占用了。

笔记本上没有COM1是运行不了的,但有的笔记本会有虚拟的COM3口,可以将数据原样返回,还有网上有一种虚拟串口的软件可以下载试用

线坏了