UC知道请教VB高手一个winsock控件的问题,在线等
来源：百度知道 编辑：UC知道 时间：2024/05/31 21:52:09
我在一台机上运行两个程序，一个发送，一个接收，我如按如下按收可以收到：
Private Sub udpPeerA_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
udpPeerA.GetData strData, vbString
txtOutput.Text = strData
End Sub
意思是怎动接收。我如想手动接收，改为如下：
Private Sub Command1_Click()
Dim strData As String
udpPeerA.GetData strData, vbString
txtOutput.Text = strData
End Sub
结果就收不到了，请问这是怎么回事呢，请高手指点。
Private Sub udpPeerA_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
udpPeerA.GetData strData, vbString
txtOutput.Text = strData
End Sub
意思是怎动接收。我如想手动接收，改为如下：
Private Sub Command1_Click()
Dim strData As String
udpPeerA.GetData strData, vbString
txtOutput.Text = strData
End Sub
结果就收不到了，请问这是怎么回事呢，请高手指点。
这么做做不到，你可以考虑这样，先把udpPeerA_DataArrival()的时候接受的数据储存到一个全局变量，然后Command1_Click()的时候调用变量
因为数据从发送到接收需要一段时间，所以大部分winsock接收数据的代码都放在Private Sub udpPeerA_DataArrival(ByVal bytesTotal As Long)内，这样做的好处是：及时，准确。