vb局域网聊天全文共5页,当前为第1页。用VB做聊天程序的方法 ---- 所谓"聊天"是指两个程序能够发送数据给对方。这个程序涉及到数据通讯的知识,仿佛很复杂,不过,由于VB给我们提供了一个Winsock控件,问题就变得很简单了。 ---- 先编写"聊天(主机)"程序。在窗体里添加Winsock控件,并设置其Protocol属性为1-SckUDPProtocol,其他属性为缺省值。接着添加两个标签和两个文本框,设置两个标签的标题属性分别为"接收窗"和"发送窗";两个文本框的标题属性为空。最后编写代码: ---- 1."聊天(主机)" Private Sub Form-Load() 设置网络地址 Winsock1.LocalPort=1024 Winsock1.RemoteHost="202.96.6.1" Winsock1.RemotePort=1999 End Sub Private Sub Text1-Change() 发送用户输入的内容 Winsock1.SendData Text1.Text End Sub Private Sub Winsock1-DataArrival (B