用vb编winsock传数据的程序,只能发送不能接受

A跟B建立连接以后,我发一个标识符,B应该会返回一串字符。我用网络调试助手测试的时候都是正常的,但是用我编的vb程序调试的时候B确实返回了数据,但是A却接收不到,请问这是... A跟B建立连接以后,我发一个标识符,B应该会返回一串字符。我用网络调试助手测试的时候都是正常的,但是用我编的vb程序调试的时候B确实返回了数据,但是A却接收不到,请问这是问什么?
A那边的vb程序如下:
Private Sub Command1_Click() '建立连接
Winsock1.Connect "169.254.4.10", 5025
End Sub

Private Sub Command2_Click() '发送数据
Winsock1.SendData Text1
End Sub

Private Sub Form_Load()
Timer1.Interval = 500
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Label1.Caption = Winsock1.State
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) '接收数据
Label2.Caption = 123 '判断有没有接收到数据
Dim strdata As String
Winsock1.GetData strdata
Text2 = strdata
End Sub
展开
 我来答
青春请稍息
2013-10-22
知道答主
回答量:5
采纳率:0%
帮助的人:9.7万
展开全部
可能你的头文件没有包含基于Windows socket的功能,你试试添加该功能
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式