快来救命啊！关于winsock的问题！快来救命啊！！！！！！！！！

我写了一个聊天软件出现了个很牛X的问题！先看代码
Private Sub Command1_Click()
Winsock1.SendData txtSend.Text
txtSend.Text = ""
End Sub

Private Sub Command2_Click()
txtMess.Text = ""
End Sub

Private Sub Form_Load()
Winsock1.Protocol = sckUDPProtocol
Winsock1.LocalPort = 10
Winsock1.RemotePort = 10
Winsock1.RemoteHost = "192.168.1.5"  这里！！！注意看这行
Text1.Text = Winsock1.LocalIP
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim Tmp As String
Winsock1.GetData Tmp, vbsting
Tmp = "¶Ô·½Î»Ö·->" + Winsock1.RemoteHostIP + "·¢ÑÔÄÚÈÝÎª->" + Tmp
txtMess.Text = Tmp + Chr$(13) + Chr$(10) + txtMess.Text
End Sub

我想把winsock1.remotehost=???改成text1.text 但是居然不行！好象10049错误但是如果我写"192.168.1.5"那就行了？？？怪不怪？救命啊！老师教的怎么不对啊！！！！！！大侠救命啊整了一晚了 --------------------编程问答-------------------- 顶啊！救命啊！ --------------------编程问答-------------------- 原因是 Text1 初始内容是非法的地址。

Text1 = "192.168.1.5"    '这里！！！注意看这行
Winsock1.RemoteHost = Text1 --------------------编程问答-------------------- 应该是Text1内容的问题 --------------------编程问答-------------------- 难道是传说中的倒粪？ --------------------编程问答-------------------- text1初始值是空值，这样写：

text1.text="192.168.1.5"

Winsock1.RemoteHost = text1.text
--------------------编程问答-------------------- 对，把顺序颠倒下嘛

补充：VB ,  网络编程