Visual Basic.Net实现TCP协议

四．客户端端程序的具体实现步骤：

　　客户端端序的实现关键在于向网络中的远程主机提出TCP连接申请，并在申请通过后，得到传输数据的基础数据流，并通过对基础数据流进行写操作向远程主机传送文本数据。由于在客户端程序中没有使用阻塞式的方法，所以程序中没有使用到线程。对远程主机提出TCP连接申请的具体实现方法请参阅以下第步；对基础数据流进行写操作，从而实现向远程主机传送文本数据的方法请参阅以下第步。下面客户端程序的具体实现步骤：

　　1. 启动Visual Studio .Net。

　　2. 选择菜单【文件】|【新建】|【项目】后，弹出【新建项目】对话框。

　　3. 将【项目类型】设置为【Visual Basic项目】。

　　4. 将【模板】设置为【Windows应用程序】。

　　5. 在【名称】文本框中输入【客户端程序】。

　　6. 在【位置】的文本框中输入【E:\VS.NET项目】，然后单击【确定】按钮，这样在"E:\VS.NET项目"目录中就产生了名称为"客户端程序"的文件夹，并在里面创建了名称为"客户端程序"的项目文件。

　　7. 把Visual Studio .Net的当前窗口切换到【Form1.vb（设计）】窗口，并从【工具箱】中的【Windows窗体组件】选项卡中往Form1窗体中拖入下列组件，并执行相应的操作：

　　二个Label组件。
　　二个TextBox组件。
　　一个StatusBar组件。
　　二个Button组件，并在这二个Button组件拖入Form1的设计窗体后，双击它们，则系统会在Form1.vb文件分别产生这二个组件的Click事件对应的处理代码。

　　8. 按照表01所示调整窗体中各组件属性的数值：

组件类型	组件名称	属性	设置结果
Form	Form1	Text	客户端程序
	Form1	MaximizeBox	False
	Form1	FormBorderStyle	FixedSingle
Button	Button1	Text	连接
	Button1	FlatStyle	Flat
	Button2	Text	发送
	Button2	FlatStyle	Flat
Label	Label1	Text	服务器IP地址：
	Label2	Text	信息：
StatusBar	StatusBar1	Text	无连接！
TextBox	TextBox1	Text	""
	TextBox1	BorderStyle	FixedSingle
	TextBox2	Text	""
	TextBox2	BorderStyle	FixedSingle

表06：【客户端程序】项目中组件设定数值表

　　并按照图02中各组件的位置和排列顺序来调整设计窗体中的组件：


图02：【客户端端程序】项目的设计界面