急急急,,跪求各位高手帮忙,,无论成功于否,我都会感谢

各位大哥,小弟我是新手,我最近在编两个程序,一个是客户端程序,另一个是服务器端程序,分别用于两台电脑上(两台电脑通过单一网线连接)

服务器端程序,要实现的功能是接受从客户端传来的数据,并逐行在listbox中显示

客户端程序,要实现的功能是:

1:先判断网络是否接通,如果接通的话，则判断,如果textbox1内容不为空,则向服务器端发送其中数据,如果textbox1内容为空,则读取本地"c:\shuju.txt"中所有数据,并逐行发送给服务器端(服务器端同时逐行显示在listbox中),其中"c:\shuju.txt"中有多少行数据无法确定

2:如果网络没有接通,则把textbox1中内容保存到本地"c:\shuju.txt"中

3:我用的vb.net2005

各位高手大虾,小弟真的很急,再次感谢了 --------------------编程问答-------------------- 服务器端程序源码为

Imports System.Net.Sockets '使用到tcplisten类
Imports System.Threading '使用到线程
Imports System.IO '使用到streamreader类

Public Class Form1
    Private iPort As Integer = 8000 '定义侦听端口号
    Private thThreadRead As Thread '创建线程,用以侦听端口号,接受信息
    Private tlTcpListen As TcpListener '侦听端口号
    Private blistener As Boolean = True '设定标示位,判断侦听状态
    Private nsStream As NetworkStream '创建接受的基本数据流
    Private srRead As StreamReader '从网络基础数据流中读取数据
    Private tcClient As TcpClient

    Private Sub listen()
        Try
            tlTcpListen = New TcpListener(iPort) '以8000端口号来初始化TcpListener实例

            tlTcpListen.Start() '开始监听

            StatusBar1.Text = "正在监听..."

            tcClient = tlTcpListen.AcceptTcpClient() '通过TCP连接请求

            StatusBar1.Text = "已经建立TCP连接！" '循环侦听

            While blistener

                nsStream = tcClient.GetStream() '获取用以发送、接收数据的网络基础数据流

                srRead = New StreamReader(nsStream) '以得到的网络基础数据流来初始化StreamReader实例

                'Dim sMessage As String

                'sMessage = srRead.ReadLine() '从网络基础数据流中读取一行数据

                ListBox1.Items.Add(srRead.ReadLine())

            End While

        Catch ex As System.Security.SecurityException
            MessageBox.Show("侦听失败！", "错误")
        End Try
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        thThreadRead = New Thread(New ThreadStart(AddressOf listen)) '以Listen过程来初始化线程实例

        thThreadRead.Start() '启动线程

        Button1.Enabled = False

        Label1.Text = "服务器已经启动！"

        Label1.ForeColor = Color.Red

    End Sub
End Class --------------------编程问答-------------------- 客户端的程序我就不会了，请各位高手指点,最好能给我源码 --------------------编程问答-------------------- 请各位高手指点

补充：.NET技术 ,  VB.NET