关于vb2005串口通讯的基本问题

wkwlxy 2008-03-20 08:50:18
我现在用vb.net作串口通讯,当接收完字节数组并让它像VB6.0一样显示在文本框里代码如下:
Dim i As Byte = 0

'Try

RevStr = ""
For i = 0 To UBound(ReByte)
If ReByte(i) > 15 Then
RevStr = RevStr & Hex(ReByte(i)) & " "
Else
RevStr = RevStr & "0" & Hex(ReByte(i)) & " "
End If
Next i

TxtRev.Text=TxtRev.Text & revstr & chr(13) & chr(10)

'Catch ex As Exception

'End Try

这样运行的时候会有错,请问各位前辈错在哪里?应该怎么修改呢?
还有我在自写的sub过程里让:cmb1.selectindex=cmb2.selectindex也有错,又应该怎么改呢?
...全文
295 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
51Crack 2008-03-20
  • 打赏
  • 举报
回复
revstr定义为全局变量

'TxtRev.Text=...改为:
Invoke(New EventHandler(AddressOf SetText))

sub SetText()
TxtRev.Text &= revstr & chr(13) & chr(10)
end sub
wkwlxy 2008-03-20
  • 打赏
  • 举报
回复
不对啊!我是一个菜鸟,所以有很多都不懂,前辈可以写得更清楚一些吗?

16,717

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧