大家指点下这个客户程序哪里错了？

Question

请大家指点下这个VB的客户端程序哪里出错了？我看不出来它哪里有错？我觉得我写对了阿？（不是抄的，我自己写的）大家指点下。红色部分是出错地方。谢了
Private Sub Command1_Click()
Winsock1.SendData Text2.TextEnd SubPrivate Sub Command2_Click()
Winsock1.RemoteHost = "192.168.1.1"
Winsock1.RemotePort = 1025
Winsock1.Connect
End Sub

Answer 1

如果是第一次运行.没有什么问题.如果你Winsock1 已经建立了连接,如果你再运行此段代码会出错.(即你点击一次Command2后,如果连接没有断开,你再点击一次会出错.)

Answer 2

同意楼上的意见！所以你的代码里，应该增加一句断开Winsock1 链接的语句即可！