控件
vb Winsock控件 接受byte数组
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区用winsock1 发送数据，发送的是byte数组，接受的时候用byte数组来接收。出现的问题，成功将数据发送的出去，可是接受的时候却接收不到，错误提示 “连接由远程端重新设置”“由于超市或其他失败连接终止”
请教各位前辈。代码如下：
发送数据：
Private Sub BWZZ()
Winsock1.Connect
Timer2.Interval = 500
Timer2.Enabled = True
End sub
Private Sub Timer2_Timer()
If Winsock1.State = 7 Then
Winsock1.senddata a ' dim a(100) as byte
End If
If Winsock1.State = 9 Then
Timer1.Interval = 0
Timer1.Enabled = False
End If
End Sub
接受数据：
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim b() As Byte
ReDim b(bytesTotal - 1) As Byte
Winsock1.GetData b, vbByte, bytesTotal
End Sub
请教各位前辈。代码如下：
发送数据：
Private Sub BWZZ()
Winsock1.Connect
Timer2.Interval = 500
Timer2.Enabled = True
End sub
Private Sub Timer2_Timer()
If Winsock1.State = 7 Then
Winsock1.senddata a ' dim a(100) as byte
End If
If Winsock1.State = 9 Then
Timer1.Interval = 0
Timer1.Enabled = False
End If
End Sub
接受数据：
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim b() As Byte
ReDim b(bytesTotal - 1) As Byte
Winsock1.GetData b, vbByte, bytesTotal
End Sub
...全文
相关推荐
VB.NET中Winsock控件的使用详解
### VB.NET中Winsock控件的使用详解#### 一、引言在VB.NET开发环境中，Winsock控件是一种非常强大的工具，用于实现网络通信功能。
VB中使用WinSock控件传送文件
传送文件对于网络编程来说是基本的功能，比如远程控制软件。在编制一个软件时，我从网上下了很多传文件的程序，这些程序提供的传文件功能根本就不能用。传文本还可以，传二进制文件根本就不行。因此，作为一个基本的功能模块，有必要单独介绍一下。 首先，在VB中要传送字符串，你可以这样写：Dim strData As StringstrData = "Test"Winsock1.SendData strDa
VB winsock服务端连接多个客户端示例
综上所述，VB winsock服务端连接多个客户端示例是一个实用的教程，它涵盖了网络编程的基础知识，包括Winsock控件的使用、C/S架构的实现、动态数组管理、多连接处理等。
VB的API方法编写的WINSOCK控件
本案例中提到的“VB的API方法编写的WINSOCK控件”就是利用API来实现网络通信功能的一种技术。
VB winsock简单实例tcp连接
VB Winsock控件是Microsoft为VB开发人员提供的一个接口，用于创建基于TCP/IP的网络应用程序。首先，我们需要在VB工程中添加Winsock控件。
