串口簡(jiǎn)單收發(fā)不難，難再于多次收發(fā)還能穩(wěn)定實(shí)現(xiàn)功能

我只會(huì)用VB做計(jì)算器

朋友能發(fā)源文件不，比較菜，困難多，謝謝!

怎么控制小燈亮滅

謝謝分享，做些簡(jiǎn)單應(yīng)用，不錯(cuò)的

謝謝樓主分享！！！

CYY8530 發(fā)表于 2019-11-7 16:47
CY:
求指點(diǎn)一下，VB做一個(gè)通訊，讀多功能儀表數(shù)據(jù)

先用下位機(jī)返回?cái)?shù)據(jù)接收結(jié)果，確保數(shù)據(jù)被正確接收。然後再檢查下位機(jī)接收數(shù)據(jù)處理方法及返回?cái)?shù)據(jù)

幸福假小子 發(fā)表于 2019-3-14 22:56
VB.NET我也會(huì)和C#.NET 差不多。不過我不喜歡C#的對(duì)括號(hào){}

CY:
求指點(diǎn)一下，VB做一個(gè)通訊，讀多功能儀表數(shù)據(jù)

CY:
讀不出來，

CY:
問題出在哪里

CY:
串口2.3腳短接，文本框能顯示出發(fā)送的指令碼。

幸福假小子 發(fā)表于 2019-3-14 22:56
VB.NET我也會(huì)和C#.NET 差不多。不過我不喜歡C#的對(duì)括號(hào){}

Private Sub Form_Load()
MSComm1.CommPort = 4 '設(shè)定 Com1 用來進(jìn)行串口通訊
MSComm1.PortOpen = True
MSComm1.Settings = "9600,n,8,1"  '9600 波特率,無校驗(yàn),8 位數(shù)據(jù)位,1 位停止位


MSComm1.Output = Text1.Text '將 Text1 中的字符串寫入傳輸寄存器
'Text2.Text = MSComm1.Input
End Sub

Private Sub Form_Unload(Cancel As Integer)
MSComm1.PortOpen = flse
End Sub

Private Sub Timer1_Timer()

Dim buffer As String '定義 buffer 為字符串
buffer = MSComm1.Input '將接收寄存器中的字符賦值給 buffer
List1.AddItem buffer '將 buffer 的值加入到列表框中顯示出來
End Sub

大佬幫幫我QAQ，我這邊直接接收是正常的，但是只要往外發(fā)送數(shù)據(jù)之后，再接收到的就全是16進(jìn)制了QAQ

很好，樓主贊一個(gè)

mark，贊一個(gè)！

好厲害啊

玩的不錯(cuò)啊，好~~~~~~~~~~

hange_v 發(fā)表于 2019-3-14 22:33
建議試試C#的winform

VB.NET我也會(huì)和C#.NET 差不多。不過我不喜歡C#的對(duì)括號(hào){}

建議試試C#的winform