vb winsock udp简单的聊天例子错在哪里?

A方程序代码（winsock控件的name改成了udpPeerA，text控件改成了TextSend和textoutput）
-----------------
Private Sub Form_Load()
With udpPeerA
.RemoteHost = "PeerB"
.RemotePort = 1010
.LocalPort = 1011
.Bind 1011
End With
frmPeerB.Show
End Sub

Private Sub Command1_Click()
udpPeerA.SendData TextSend.Text' 这里提示参数错误
End Sub

Private Sub udpPeerA_DataArrival(ByVal bytesTotal As Long)
Dim strdata As String
udpPeerA.GetData strdata, vbString
TextOutput.Text = strdata
End Sub
----------------------------------
B方代码：
-------------------
Private Sub Form_Load()
With udpPeerB
.RemoteHost = "PeerA"
.RemotePort = 1011
.LocalPort = 1010
.Bind 1010
End With
End Sub

Private Sub command1_click()
udpPeerB.SendData TextSend.Text'这里提示参数错误
End Sub

Private Sub udpPeerB_DataArrival(ByVal bytesTotal As Long)
Dim st

VB 的Winsock UDP协议 VB 的 winsock 控件UDP协议能不能实现多人连机？？？ winsock如何使用UDP协议发送数据(VB) 关于vb winsock用udp端口被占用 vb winsock 问题 vb中，winsock部件 vb winsock access 问题 vb winsock控件问题 VB winsock应用于internet vb winsock编程问题