本人VB新手,最近用USB轉RS232用VB6.0撰寫出現了8020的問題,作業系統是WIN7 64位。
用串口除錯助手測驗是沒有問題的,可以發送接受資料,驅動說明沒有問題。
程式是從CSDN論壇上下載的(VB串口通信程式(VB程式))。請問各位大神有什么辦法解決嗎?下面附上代碼和一些串口除錯助手,和埠截圖。


代碼:
Private Sub CMDRe_Click()
TRe.Text = TRe.Text & vbCrLf & CStr(MSComm1.Input)
MsgBox "2222 first"
End Sub
Private Sub CMDSend_Click()
If MSComm1.PortOpen = True Then
MSComm1.Output = TSend.Text
MsgBox "ccccccc first"
Else
MsgBox "please connect first"
End If
End Sub
Private Sub Connect_Click()
If MSComm1.PortOpen = True Then
MSComm1.PortOpen = False
MsgBox "FALL"
Else
MSComm1.PortOpen = True
End If
End Sub
Private Sub Form_Load()
MSComm1.CommPort = 7
MSComm1.Settings = "9600,n,8,1"
MSComm1.InBufferCount = 0
MSComm1.RThreshold = 1
MSComm1.SThreshold = 1
End Sub
Private Sub MSComm1_OnComm()
Select Case MSComm1.CommEvent
Case comEvReceive
TRe.Text = TRe.Text & MSComm1.Input & vbCrLf
End Select
End Sub
程式下載地址:http://download.csdn.net/detail/huphup/1195874
uj5u.com熱心網友回復:
建議你使用VB.NET serialport ,VB6+MSCOMM 用在WIN7 64位,可能不怎么靈光uj5u.com熱心網友回復:
VB6+MSCOMM 用在WIN7 32也經常比靈光的好像我的串口連接了6,8腳為高就經常不穩定,出錯,就找不到串口了。串口精靈也一樣會出錯
uj5u.com熱心網友回復:
恩 我用SP了。。 但是我還是想知道為什么會出現這個問題額
uj5u.com熱心網友回復:
我的串口就只將2,3腳短接而已。。
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/126378.html
標籤:控件
上一篇:excel 應用DTpicker ,打開檔案不能插入日期
下一篇:Vb資源下載(CSDN中)
