gpt4 book ai didi

vb.net - 串口读取包括在 vb.net 中写入的内容

转载 作者:行者123 更新时间:2023-12-04 18:13:16 25 4
gpt4 key购买 nike

所以我正在尝试使用 AT 命令与 gsm 调制解调器通话,我正在尝试通过发送命令 AT 并接收 OK 来进行基本测试以确保调制解调器正常。问题是我收到“AT Blank Line OK”,有什么办法让我发送 AT 时,我只读 OK?

Imports System.IO.Ports

Public Class GUI
Dim Device As New System.IO.Ports.SerialPort()
Private Sub GUI_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Port.Text = "Select Port"
For Each item As String In IO.Ports.SerialPort.GetPortNames
Port.Items.Add(item)
Next
Device.BaudRate = 9600
Device.Parity = Parity.None
Device.StopBits = StopBits.One
Device.DataBits = 8
Device.Handshake = Handshake.RequestToSend
Device.DtrEnable = True
Device.RtsEnable = True
Device.NewLine = vbCrLf
Device.WriteTimeout = 5000
End Sub

Private Sub Port_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Port.SelectedIndexChanged
Device.PortName = Port.SelectedItem.ToString
End Sub

Private Sub Send_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Send.Click
Try
Device.Open()
Dim msg As String
msg = Message.Text
Device.DiscardInBuffer()
Device.DiscardOutBuffer()
Device.Write("AT" & vbCrLf)
MsgBox(Device.ReadExisting())
Catch ex As Exception
MsgBox("Error!")
End Try
Device.Close()
End Sub
End Class

最佳答案

听起来调制解调器设置为 Echo 命令。要关闭此功能,请尝试发送 E0第一的。

More info here

关于vb.net - 串口读取包括在 vb.net 中写入的内容,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/12205531/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com