请教VS 2010中,VB 编程串口通讯异常问题
vs2010吧
全部回复
仅看楼主
level 1
zengjiadongOO 楼主
小白的我试着学习用sv2010 VB.NET编写了一个串口例程,运行连接串口时无反应,请问各位老师,是什么原因?
查看调试器显示为
为“17d14f5c-a337-4978-8281-53493378c1071.vb”查找源。Checksum: MD5 {14 dc 6 4d fc 63 f0 f2 c e8 f6 d0 f1 f7 b8 8c}
正在脚本文档中查找“17d14f5c-a337-4978-8281-53493378c1071.vb”...
正在项目中查找“17d14f5c-a337-4978-8281-53493378c1071.vb”。
在项目中未找到该文件。
正在目录“C:\Program Files (x86)\Microsoft Visual Studio 10.0\VC\crt\src\”中查看...
正在目录“C:\Program Files (x86)\Microsoft Visual Studio 10.0\VC\atlmfc\src\mfc\”中查看...
正在目录“C:\Program Files (x86)\Microsoft Visual Studio 10.0\VC\atlmfc\src\atl\”中查看...
正在目录“C:\Program Files (x86)\Microsoft Visual Studio 10.0\VC\atlmfc\include\”中查看...
活动解决方案的调试源文件设置指明调试器不会要求用户查找文件: 17d14f5c-a337-4978-8281-53493378c1071.vb。
调试器未能找到源文件“17d14f5c-a337-4978-8281-53493378c1071.vb”。
串口打开连接程序如下:
Private Sub Serial_Port1() '设置串口参数
'SerialPort1.BaudRate = Val(baudratebox.Text) '波特率
'SerialPort1.PortName = portnamebox.Text '串口名称
SerialPort1.PortName = portnamebox.SelectedItem
SerialPort1.BaudRate = Val(baudratebox.SelectedItem)
SerialPort1.DataBits = 8 '数据位
SerialPort1.StopBits = IO.Ports.StopBits.One '停止位
SerialPort1.Parity = IO.Ports.Parity.None '校验位
End Sub
'打开串口连接
Private Sub openbtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Try
SerialPort1.Open() '打开串口
Label3.Text = SerialPort1.IsOpen
If SerialPort1.IsOpen = True Then
statuslabel.Text = "串口已连接"
statuslabel.ForeColor = Color.Green
End If
Catch ex As Exception
MessageBox.Show(ex.Message) '弹出一个标题为错误的对话框,包含有指定ex.message的文字信息,
End Try
' Try,试图尝试执行任务,语句后加入' Catch ex As Exception 'End Try
'出了意外后让程序做挽救.至少保证你程序不会突然崩溃
'与Handles执行不同()
End Sub
2018年08月27日 11点08分 1
1