Private Sub Form_Load()
With Winsock1
.Bind 1001 ' 本机的端口号
End With
End Sub
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
Winsock1.GetData strData '接收字节
List1.AddItem strData
这个用UDP进行连接的.只不过是对单个机器进行的.
串口通信最终都是用二进制传输的,你用代码把二进制转化成十六进制就可以了.不需要额外设置.
用 vb.net socket通信
Dim th As Threading.Thread
①.0 Try
①.1 If IP "" Then
以上就是土嘎嘎小编为大家整理的vb.net通信相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!